Thread Kommaseparierte Listen bereichsweise ausgeben.
(28 answers)
Opened by Gast at 2006-04-14 16:54
an die Kommandozeilenparameter kommst du über das Array @ARGV:
Code: (dl
)
my ($key, $min, $max) = @ARGV; ausgeben willst du eine Zeile wenn in der Zeile der Suchschlüssel gefunden wird und dessen numerischer Wert (nach dem '=') größer oder gleich dem Minimalwert ist und kleiner oder gleich dem Maximalwert: Code: (dl
)
m/$key=(\d+)/ && $1 >= $min && $1 <= $max Das einlesen der Eingangsdaten sollte allerdings nicht so erfolgen: Quote Schau dir mal http://perldoc.perl.org/functions/open.html an. |