perl 5.0 alpha 6

[p5sagit/p5-mst-13.2.git] / bar

#!./perl

require POSIX; import POSIX;

print &getpid, "\n";

@uname = &uname;
print "@uname\n";