Bonjour , j'ai récupéré un algo de parcour de graphe en perl , celui si marche bien mais utilise un scalaire hors moi je doit utiliser un tableau , j'ai fait énormement d'essaie tous soldés par des echecs , n'etant pas très fort en algo (sa arrange pas ), je vous demandent un ti coup de main parce que vraiment je galère et j'ai absolument besoin de cet algo pour que mon script fonde pas un bétrave (il ce bloque et tourne en rond).
voici le code original en perl
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 sub bot { foreach my $url ( @_ ) { next if defined $vus{$url}; push(@avoir, $url); } return if $#avoir == -1; while (my $link = shift @avoir) { ++$vus{$link}; ..... } }
Mon dernier essaie en date (On ce moque pas)
Ma fonction existance dans le grep vérifie si $_ na pas déjà été traité par le script , c'est une fonction sql je met tout ce qui passe dans sql server comme sa je vérifie si oui ou non $_ a déjà été traité.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 sub bot { foreach (@_) { my @list = grep( { (existance($_) == 0) } @_); push(@visite, @list); } return if $#visite == -1; while (my @site = @visite) { store(@site); ?????? .... } }
store() met le contenue de @site dans la base de données.
merci de votre aide
Partager