P:\test>perl -e" @x = undef; $x[ -1 ]->fred()"
Can't call method "fred" on an undefined value at -e line 1.