Searched refs:coderef2text (Results 1 – 5 of 5) sorted by relevance
56 my $deparsed = $deparse->coderef2text( $coderef );78 print "not " if (eval "sub ".$deparse->coderef2text(\&c))->() ne 'stuff';83 ne $deparse->coderef2text(sub{(-1) ** $a });87 my $string = "sub " . $deparse->coderef2text(\&cr);
121 ok($@, qr/The result of B::Deparse::coderef2text was empty/);
383 my $sub = 'sub ' . (B::Deparse->new)->coderef2text($val);
670 sub coderef2text { subroutine
10446 =item coderef2text