necesito traducir esto...

[engonga]

Me han passado esto en perl, pero me interesaria passarlo a PHP y ASP. ASP no se si será possible.

esta hecho en perl.


print "Pillando foto del dia...\n";

# Conectamos y pillamos el documento...
$doc = get "http://actualidad.wanadoo.es/";;
@abc=split(/\n/,$doc);
$pillar = 0;

foreach $linea (@abc) {
if ($pillar eq 0) {
if ($linea =~ "<a href=\"/galerias/index_1.html\" class=\"lnk\">") {
($kk1, $kk2) = split("<img src=\"", $linea);
($urlimg, $kk2) = split("\" class=", $kk2);
$pillar = 1;
}
}

alguien sabe si se puede traducir, a PHP y a ASP?

[monoswim]

Si, seguramente se puede traduir a PHP o a ASP, pero yo no se ninguno de esos, lo que no se es que hace la funión GET que está en la primera línea

ese es todo el código?

Saludos