my ($obj, $pkg, $cb, $x, @a);
our $y;
sub meh;
-sub try (&);
+sub zap (&);
{
local $/ = "####";
####
system { $a[0] } @a;
####
-try { };
+zap { };
####
-try { 1; };
+zap { 1; };
####
-try { 1; 1; };
+zap { 1; 1; };
####
-try { try { }; 1; };
+zap { zap { }; 1; };