Select Code to Download

#!/usr/local/bin/perl 

...
}

print result(@ARGV);

$ PERLDB_OPTS="NonStop AutoTrace frame=29" perl -d ./silly.pl 2 3 4
Package ./silly.pl.
...
list context return from main::result:
0  9
9