Lines Matching refs:func
1018 my($caller,$func,$line,@rest) = caller(1); # caller(0) eg
1034 $CPAN::Frontend->myprint("Debug($caller:$func,$line,[$rest]): $arg\n");
1047 my($o,$str,$func,$args,$key_exists);
1055 $func = shift @args;
1056 $func ||= "";
1057 CPAN->debug("func[$func]") if $CPAN::DEBUG;
1060 if ($func eq "push") {
1063 } elsif ($func eq "pop") {
1066 } elsif ($func eq "shift") {
1069 } elsif ($func eq "unshift") {
1072 } elsif ($func eq "splice") {