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