Not to mention if you'd enabled warnings you would have gotten griped at for trying to do so:

$ perl -e 'use warnings; my @bar; print "foo" if defined @bar'
defined(@array) is deprecated at -e line 1.
        (Maybe you should just omit the defined()?)
[download]