Gunnar Hjalmarsson wrote:
(-?\d+(?:\.\d+)?)
Better yet, use Regexp::Common:
use Regexp::Common qw(number); /(\w+)(?:\s+$RE{num}{real}){3,3}\s+(\w+)/;
That's an alternative, but would it necessarily be better? To me, using a module for such a trivial thing just creates another level of abstraction without actually making it easier.
-- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>