I added two features in bleadperl recently:
# new prototype character !
# _ is just like $, except that it defaults to $_ :
sub foo (_) {
print "<@_>\n";
}
foo(42); # prints <42>
foo(); # equivalent to foo($_)
BEGIN{
*CORE::GLOBAL::readpipe = sub($){ ... }
}
qx/foo/; # calls the function with "foo" as argument
`foo`; # same thing