problema array
Von: Larry (dontmewithme@got.it) [Profil]
Datum: 14.05.2008 12:29
Message-ID: <dontmewithme-E4BD0D.12292914052008@news.tin.it>
Newsgroup: it.comp.lang.perl
Datum: 14.05.2008 12:29
Message-ID: <dontmewithme-E4BD0D.12292914052008@news.tin.it>
Newsgroup: it.comp.lang.perl
Salve,
sto cercando di creare una sub che mi ritorni tutti gli "amici" di
un "amico" proprio seguendo il modello di myspace che divide le pagine
in 40 amici...soltanto che io non so quante pagine ci sono quindi:
mettiamo che la mia lista id sia divisa in 3 pagine (ma io non lo so sto
solo supponendo)
pagina 1: 40 ids (unici)
pagina 2: 40 ids (unici)
pagina 3: 40 ids (unici)
l'unico dato che so durante il mio sfogliare le pagine è che se chiamo
pagina 4 avr gli stessi ids di pagina 3 e mi devo basare su questo per
capire che le pagine erano 3 e che mi posso fermare
nell'esplorazione...questo è il codice che ho scritto ma che non
funziona tanto bene:
#!/perl
my $page = 0;
my $id = 60964437; # me
my $last_friend;
my @main;
while (1)
{
$page++;
my $html = &_return_htmlcode_from_myspace( $id, $page );
while ( $html =~ /<div friendid="(\d+)">/g )
{
push @_, $1;
}
if ( $last_friend && $last_friend == $_[$#_] )
{
last;
} else {
$last_friend = $_[$#_];
push @main, @_;
}
}
purtroppo in @main non mi ritrovo tutti gli ids delle 3 pagine ma tante
volte gli stessi ids a ripetizione...perchè??
grazie
[ Auf dieses Posting antworten ]Antworten
- Larry (14.05.2008 14:08)
