Comment by jstanley

2 days ago

Ha, (1.) was deliberate but I'd forgotten (2.)

Yeah, you probably want

  my ($x, $y, $z) = @shift;

:-D