Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 1189c5a6e2
Fetching contributors…

Cannot retrieve contributors at this time

16 lines (11 sloc) 0.27 kb
package x;
use Test::More tests => 1;
use Symbol::Approx::Sub (xform => undef,
match => sub { my ($sub, @subs) = @_;
foreach (0 .. $#subs) {
return $_
if $sub eq reverse $subs[$_];
}
return;});
sub oof {'yep'};
ok(foo() eq 'yep');
Jump to Line
Something went wrong with that request. Please try again.