[EMAIL PROTECTED] wrote:
> Perl Regular Expression Problem
>
> We are having a problem with Perl's evaluation of regular expressions.
>
> Here is a code snippet:
>
># This regular expression is looking for a word ending in "s" followed
># by something in parentheses
># If the while-
It works as expected for me and it's build 811. At this point I would take
it onto Bugtraq. Something's not right with ur build
C:\WINDOWS\Desktop>perl
$method = 'Modules("M6833x LA")';
$method =~ /(\S+)s\s*\(\s*(.+)\s*\)\s*$/;
$method = $1 . "s";
print( "POST METHOD [$method]\n" );
POST METHOD