Opened by Anton Mehl at 2012-07-11 15:33
Code (perl): (dl
)
1 2 3 4 5 6
if ($_ =~ m/^ProductName=(.+)$/) { my $teil = $1; chomp $teil; $pruef = 1; print $teil, "\n"; }
Last edited: 2012-07-11 16:26:00 +0200 (CEST)
|
Thread Regulärer Ausdruck zum Suchen eines Wortes
(4 answers)
Opened by Anton Mehl at 2012-07-11 15:33 Code (perl): (dl
)
1 2 3 4 5 6 if ($_ =~ m/^ProductName=(.+)$/) { my $teil = $1; chomp $teil; $pruef = 1; print $teil, "\n"; } Last edited: 2012-07-11 16:26:00 +0200 (CEST) |