print Dumper \@list; # check that the content of @list is what you expect