Stricture requires you to qualify or declare all your variables.

Use  use vars qw/ *aref/;