Actually, had this been meaningful code, you should have written (note use of my; see also our for global variables):

use strict;
use warnings;

my @mammals = qw(dog cat mouse horse planet);
my @sky = qw(star planet galaxy nova comet);
[download]

Please see Use strict warnings and diagnostics or die.