Nein, das war nur ein Beispiel.
OK, dann suchst du grep:
@browser = grep $_ ne 'IE', @browser;
Ich komm glaub um eine Schleife nicht drum rum,
da meine Abfrage nicht ganz so simple wie das Beispiel ...
my $ping = Net::Ping->new("icmp");
foreach my $switch (@SWITCHES)
{
if (!$ping->ping($switch,3))
{
print "Switch $switch not reachable.\n";
# >>> Hier möchte ich nun $switch aus dem array @SWITCHES entfernen
}
}