- or download this
print "#/usr/local/bin/perl\n";
foreach (param()){
print ("param('$_' , '", param($_), "'\n");}
- or download this
#/usr/local/bin/perl
param('p1', 'v1');
param('p2', 'v2');...
- or download this
DB<1> require "mydebugparam.pl"
DB<2> x param()
- or download this
#/usr/local/bin/perl
sub sn{
param('p1', 'v1');
param('p2', 'v2');...}
- or download this
DB<1> require "mydebugparam.pl"
DB<2> sn()
DB<3> x param()