Foro - Perl en Español

por **José luis** » 2012-12-13 17:40 @778

Hola, amigos. Necesito un poquito de ayuda en este caso. Lo que hice es que tengo un menú (do) y tengo algunos comandos, y necesito que el usuario cuando ponga

fav_url http://perlenespanol.com/

que "http://perlenespanol.com" se agregue a una lista de mis web favoritas...

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my $url = 0;
do {
    my $fav = "add fav_url ";
    printf("I-ExploiT !¡> ");
    chomp( $opt = <> );
    if ( $opt eq $fav ) {
        print "Ayuda.!!";
    }
} until $url;
 
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

my $entrada = <>;
chomp $entrada;
 
my @palabras = split " ", $entrada;   # Lo separamos por los espacios en blanco
 
if ($palabras[0] eq 'fav_url') {      # Si la primera palabra es 'fav_url'
    push @lista_URL, $palabras[1];    # Guardamos la URL en la @lista_URL
}
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **José luis** » 2012-12-13 19:32 @855

Gracias, man, pero no comprendo el orden que debo poner el código que me diste...

¿Me podrías hacer un ejemplo con el código que te he pasado? PD: Gracias, man.

Foro - Perl en Español

Leer opciones desde un menú

Leer opciones desde un menú

Publicidad

Re: Leer opciones desde un menú

Re: Leer opciones desde un menú

¿Quién está conectado?