1
« en: Viernes 24 de Septiembre de 2004, 18:23 »
Hola como estas no tengo demaciada experiencia en perl pero algo puedo ayudarte.
Lo que estas haciiendo cuando haces use MIME::Base64; es llamar a una funcion del paquete que tenes definido como MIME.
Cuando haces: @off = (54,68,65,20,73,65,74,75,70,20,70,72,'6f',63,65,'9f') estas definiendo una estructura off a la cual le asignas todos esos elementos, pudiendola usar despues accediendo por un indice.
Entonce cuando haces: foreach $love (@off) estas reorriendo esta estructura por cada ellemnto.
Esto: substr($a,$w,2) es una funcion q hace algo recibiendo 3 parametros.
Espero haberte ayudado, suerte.
claudia