my @array = qw(a b c);
push @array, d; #should fail