Help for this page
$_[0]=$filecount;
0:42 >perl -wE "sub f { ++$_[0] } $x = 42; f($x); say $x;" 43 0:43 >