Help for this page

Select Code to Download

Select or download this

$x = "x";
$y = "y";
...

my $code = sub { print "$x $y\n" };
uc_call($code);