Thread $ARGV[0] in @array überprüfen
(28 answers)
Opened by Duff at 2007-10-18 18:20
Ich will hier überprüfen, ob ein Argument angegeben wurde und wenn ein Argument angegeben wurde, ob dieses Argument im Array steht (alle Elemente im Array sind nämlich gültig.
Code (perl): (dl
)
1 2 3 4 5 6 7 8 # Die Usage if(($#ARGV==0) || (! $ARGV[0]) || (grep{ $ARGV[0] eq $_,} @array )) { print "\nUsage: $0 <argument>\n\n"; print "argument: \n"; print '-'x20 . "\n"; foreach (@array){print "$_\n";} exit 1; } Im Moment lande ich immer wieder in der Usage. D'OH
Daniel |