push to array perl

push @names, 'Moo';