Using perl Syntax Highlighting
print "introduce url:\n";
$url=<STDIN>;
chomp $url;
--pseudocódigo
Si la url no tiene http:// al principio
lo añadimos
Si la url no tiene / al final
lo añadimos
$url=<STDIN>;
chomp $url;
--pseudocódigo
Si la url no tiene http:// al principio
lo añadimos
Si la url no tiene / al final
lo añadimos
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
Gracias amigos.