If say isn't available you can use 5.010 or just use feature 'say';

If you just want a quick peek into an array, Data::Dumper is good for that or just print "$_\n" for @month