Help for this page

Select Code to Download


  1. or download this
    > perl
open ONE, ">", "/tmp/tst";
...
__END__
TWO 
 Space doesn't matter!
  2. or download this
    > perl
open ONE, ">", "/tmp/tst";
...
> cat /tmp/tst
TWO
>
  3. or download this
    > perl
open ONE, ">", "/tmp/tst";
...

__END__
Undefined subroutine &main::ONE called at - line 3.