Help for this page
use strict; use warnings; ... my @call = caller(1); print '#- in ',$call[3],' ',Dumper($_),"\n" for (@_); }
#- in mySub $record = [ 'aUser', 'aPassword' ]
www.com | www.net | www.org
No recent polls found