Help for this page
my @got = pair( . . . );
my @got2 = map { [$_->[0],$_->[1],'meowmoo'] } @got;
my @got3 = map { &{$_->[1]}($_->[2]) ? $_->[0] : () } @got2;
&{$_->[1]} # Get the subroutine referanced in $got2[$i][1] ($_->[2]) ? # Pass in the value of $got2[$i][2] ('meowmoo') ... # with that subroutine. () # Otherwise, return undef
www.com | www.net | www.org
No recent polls found