push(@array,$foo) unless (grep /$foo/,@array);