Select Code to Download

#! perl
use strict;
...
    print "\@x = (@x)\n";
    print "\$y = '$y'\n";
}

17:35 >perl 678_SoPW.pl

...
17:35 >perl -v

This is perl 5, version 18, subversion 0 (v5.18.0) built for MSWin32-x
+86-multi-thread-64int