in reply to I've never seen this before - $#a = 4 - ??
Here's an example:
perl -MData::Dumper -e '$#foo = 4; print Dumper \@foo' [download]