Select Code to Download

#! perl
use strict;
...
 name('3b', @array, 'extra_2');
my $fp = \&name;
$fp->('3c', @array, 'extra_3');

16:19 >perl 833_SoPW.pl
Useless use of a constant ("x") in void context at 833_SoPW.pl line 29
+.
...


16:19 >