my @array = (hans, susanne, peter);

for (@array) {
 if (/susanne/) {
  # element susanne rauslöschen
 }
}