Da veri geek qualche volta ci sarà capitati di dover salvare i risultati di una particolare ricerca di google,poiché è possibile utilizzare le API di Google per ottenere risultati e metterli in qualsiasi formato che ti piace, perché non adoperare le migliori tecniche geek per utilizzare al meglio Google, salvare i risultati proprio come abbiamo bisogno.
Ecco un semplice codice utile per il nostro intento
#!/usr/bin/perl
# google2csv.pl # Google Web Search Results exported to CSV suitable
# for import into Excel
# Usage: perl google2csv.pl < results.html > results.csv
print qq{"title","url","size","domain suffix"n};
my($results) = (join '', <>) =~
m!
!mis;
while ( $results =~
m!
(.+?).+?s+-s+(d+k)?!mgis
) {
my($url,$title, $size) = ($1||'',$2||'',$3||'');
my($suffix) = $url =~ m!.(w+)/!;
$title =~ s!"!""!g; # double escape " marks
$title =~ s!<.+?>!!g; # drop all HTML tags print
qq{"$title","$url","$size","$suffix"n};
}
Eseguire lo script dalla riga di comando, specificando HTML il risultato nome del file e il nome del File CSV che si desidera creare o di cui si desidera aggiungere ulteriori risultati. Ad esempio, utilizzando results.html results.csv come input e come output:
$ perl google2csv.pl results.csv
I commenti sono chiusi.