[perl] separando los componentes de una url

[info@maseducativa.com]

Hola de nuevo:

Cuando hago comparación

=~ /(\w+)://([^/:]+)(:\d*)?([^#]*)/

para una url, digamos por ejemplo, http://maseducativa.com:80/cgi-bin/forum.cgi?mensaje=2205

me aparecen en las variables esta información

$1= http
$2= maseducativa.com
$3= 80
$4= /cgi-bin/forum.cgi?mensaje

Sin embargo, no entra el final '=2205' en esa variable $4

¿Alguien me dice donde está el error?


Un cordial saludo
Manuel Pérez López
mapelo@maseducativa.com
http://www.maseducativa.com
¡Tu página de inicio en la Internet Educativa!



--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl