perl 5.0 alpha 6
[perl.git] / bar.pm
1 #!./perl
2
3 print "";
4 @c = caller;
5 print "@c";
6 __END__
7
8 require POSIX; import POSIX getpid;
9
10 print &getpid, "\n";