Troll [181] as maint ~/ %cat foo                                      [11:33pm]
#!/usr/bin/perl -w
use strict;

&help;

sub help() {
print <<"EOF";
blah blah
EOF
}

Troll [182] as maint ~/ %perl foo                                     [11:33pm]
blah blah
Troll [183] as maint ~/ %