Select Code to Download

#!/usr/local/bin/perl
use strict;
...
                print "Doesn't begin with #\n";
        }
}

main::(jt:12):                  redo;
  DB<2>
...
        old value:      '#'
        new value:      ''
main::(jt:9):           chomp( $line );