my @array = grep{$_ ne $suchstring}@array;