Guh. My #perl is getting rusty. Couldn’t even deal with subroutine arguments correctly.

sub foo { my ($bar) = $_; # bonk … }