perl -e “do ‘./a.pl’;my @result=&parse_func(’$abc’); foreach $tmp(@result) {print ‘xxxxline=’;print $tmp;}”
perl -e “do ‘./a.pl’;&parse_func(’$abc’);”
perl -e “do ‘./a.pl’;my @result=&parse_func(’$abc’); foreach $tmp(@result) {print ‘xxxxline=’;print $tmp;}”
perl -e “do ‘./a.pl’;&parse_func(’$abc’);”