At 11:03 AM 12/9/2005 -0500, Chris Wagner wrote:
>@docs = $text =~ m/https?:.+\/([^\/]+\.s?html?)/igs;

Should have made that @docs = $text =~ m/https?:.+\/([^\/]+\.s?html?\b)/igs;

The \b anchors at a word boundary.  That way it excludes other extensions
that start with html. (.htmlx, .htmlbob, etc.)






--
REMEMBER THE WORLD TRADE CENTER         ---=< WTC 911 >=--
"...ne cede malis"

00000100

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to