Gurus,
I've not seen this done, so I don't know if it can be, but... Is there a
way to get $1 from a pair of parens in a regexp into a variable in one
line? That is...
my $foo = 'http://10.20.30.40/gargle';
$foo =~ /(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})/;
my $fee = $1;
print "IP = \"$fee\"\n";
...is there some way to get the second and third lines into one line?
Deane Rothenmaier
Systems Architect
Walgreens Corp.
847-914-5150
"Science is not only compatible with spirituality; it is a profound source
of spirituality." -- Carl Sagan_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
