$string =~ s|(wid get)|'<a href="search.cgi?q='.uri_escape($1).'">$1</a>'|ie;
Correction:
$string =~ s|(wid get)|'<a href="search.cgi?q='.uri_escape($1)."\">$1</a>"|ie;
-- Simon Oliver
_______________________________________________ Perl-Win32-Web mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
