Help for this page

Select Code to Download


  1. or download this
    BEGIN {
    $INC{'MyModule.pm'} = __FILE__;
...

print "yeah!\n" if $thingy->is_thing();
print "boo!\n" unless $thingy->is_thing();
  2. or download this
    
__END__
...
$ cat myscript.pl                         >>newfile.pl
$ perl newfile.pl
yeah!
  3. or download this
    $ cat myscript2.pl
#!/usr/bin/perl -w
...
print "boo!\n" unless $thingy->is_thing();

$