Hola, buenas. Mi intención es crear un
script que me permita guardar en un txt unos datos en concreto que tengo en una página web.
Using html4strict Syntax Highlighting
width="62">GUARDAR_1
</td>
target="_blank" class="style14">GUARDAR_2
</a>
download/GUARDAR_3"
author/AQUI_PUEDE_PONER_CUALQUIER_COSA">GUARDAR_4
</a>
...
width="62">GUARDAR_1
</td>
target="_blank" class="style14">GUARDAR_2
</a>
download/GUARDAR_3"
author/AQUI_PUEDE_PONER_CUALQUIER_COSA">GUARDAR_4
</a>
...
Coloreado en 0.002 segundos, usando
GeSHi 1.0.8.4
Así sucesivamente.
Quiero guardar los
GUARDAR_* en sus correspondientes
arrays @guardar1,
@guardar2,
@guardar3,
@guardar4.
Y lo que he puesto delante y después de cada
GUARDAR_* son los
string para localizar su ubicación.
En la última línea donde dice "AQUI_PUEDE_PONER_CUALQUIER_COSA" la cual forma parte
del
string de búsqueda del
GUARDAR_4, puede cambiar, entonces supongo que tendremos que hacer uso de alguna expresión que no dé importancia a lo que haya en ese lugar.
Using perl Syntax Highlighting
#!/usr/bin/perl
use IO::Socket::INET;
use LWP::UserAgent;
use HTTP::Request;
use LWP::Simple;
$host = "URL DE LA WEB";
my $final = $host;
print $final,"\n\n";
my $ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(GET => $final);
$doc = $ua->request($req)->as_string;
Coloreado en 0.003 segundos, usando
GeSHi 1.0.8.4
Y después de esto debería ir la búsqueda y el guardo.
He probado varias cosas pero no consigo.
Un saludo, y gracias anticipadas.
