Select Code to Download

    #!/usr/bin/perl -w
    use strict;
...
    BEGTITLE Last wirey haired dog story ENDTITLE
    BEGTXT we don't need no steenkin' wirey haired dogs here ENDTXT

    #!/usr/bin/perl -w
    use strict;
...
    BEGTXT Grooming a wirey haired dog is ... ENDTXT
    BEGTITLE Last wirey haired dog story ENDTITLE
    BEGTXT we don't need no steenkin' wirey haired dogs here ENDTXT

    BEGPUB Wirey Haired Dogs Life ENDPUB BEGTITLE My dog 
    has wirey hair ENDTITLE
...
    still has wirey 
    hair ENDTITLE BEGTXT more wirey
    haired dog stuff ENDTXT

    #!/usr/bin/perl -w
    use strict;
...
    still has wirey 
    hair ENDTITLE BEGTXT more wirey
    haired dog stuff ENDTXT