- or download this
if (grep {$_ eq $zero_arg} @ARRAY) and not grep {$_ eq $sec_arg} @anot
+herarray){
doSomething();
}
- or download this
for my $Str ($zero_arg, $sec_arg){
die "$Str is not in routers.txt" unless grep {$_ eq $Str} @Routers;
...
# so do something
}
}
- or download this
for my $Str ($zero_arg, $sec_arg){
die "$Str is not in routers.txt" unless grep {$_ eq $Str} @Routers;
...
# They are both there
# So do something
}