in reply to regular expression help
$ perl -le' my @strings = ( "a=1 gibberish b=2 c=3", "a=1 gibberish c=3" ); for ( @strings ) { print; my ( $a, $b, $c ) = / (?= .* \ba = (\S+) )? (?= .* \bb = (\S+) )? +(?= .* \bc = (\S+) )? /x; print "\$a = $a \$b = $b \$c = $c"; } ' a=1 gibberish b=2 c=3 $a = 1 $b = 2 $c = 3 a=1 gibberish c=3 $a = 1 $b = $c = 3
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: regular expression help
by Tobin Cataldo (Monk) on Dec 16, 2009 at 21:54 UTC |