http://www.perlmonks.org?node_id=442844


in reply to Re^2: Stupid mistakes I repeatedly make
in thread Stupid mistakes I repeatedly make

There's always
$_= shift for my ($i, $j, $k);
which is pretty foolproof, though unconventional (read "ugly").

Caution: Contents may have been coded under pressure.