Started a new module, Test::Regex, as a proof of concept. Not sure it's something that's useful (although to at least one person it is), or if it should be rolled into Test::More to avoid code duplication, or what.
Lets you check the dollar vars of your results matches_are( "dog food", qr/dog(.+)/, 1=>"food", "Matched OK" ); or matches_are( "first middle end", qr/middle|center/, "&" => "middle", "`" => "first " ); Eventually we'll handle the punc vars, but for now this will do. Thoughts? xoa ----- Forwarded message from PAUSE <[EMAIL PROTECTED]> ----- The uploaded file Test-Regex-0.01.tar.gz has entered CPAN as file: $CPAN/authors/id/P/PE/PETDANCE/Test-Regex-0.01.tar.gz size: 2890 bytes md5: 565b7e75907b621dfc411bb967b38fe7 No action is required on your part Request entered by: PETDANCE (Andy Lester) Request entered on: Mon, 02 Aug 2004 03:14:00 GMT Request completed: Mon, 02 Aug 2004 03:15:14 GMT Thanks, -- paused, v460 ----- End forwarded message ----- -- Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance