Le Mon, 24 Jun 2019 19:53:55 +0000, Nicolas George a écrit :
Jo Engo , dans le message <pan$bd161$c8240b45$4aea2fd8$, a écrit :
http:// ne matche pas la regesp
Au pif, https?:// devrait débloquer la situation.
I don't think so. En fait $img est défini là : foreach my $chunk (split (/n/, $body)) { my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six); next unless defined ($img); $img =~ s///gs; $img = "//" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img" unless ($img =~ m/^http/s); je crois que la couille est là où j'ai souligné. -- Je n'ai pas souvent assisté à des course de spermatozoïdes, mais j'ai donné beaucoup de départs. -+- Olivier de Kersauson -+-
Le Mon, 24 Jun 2019 19:53:55 +0000, Nicolas George a écrit :
Jo Engo , dans le message
<pan$bd161$c8240b45$4aea2fd8$4ecff085@icite.fr>, a écrit :
http:// ne matche pas la regesp
Au pif, https?:// devrait débloquer la situation.
I don't think so.
En fait $img est défini là :
foreach my $chunk (split (/n/, $body)) {
my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six);
next unless defined ($img);
$img =~ s/\//gs;
$img = "//" unless ($img =~ m@^/@s);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$img = "http:$img" unless ($img =~ m/^http/s);
je crois que la couille est là où j'ai souligné.
--
Je n'ai pas souvent assisté à des course de spermatozoïdes, mais j'ai
donné beaucoup de départs.
-+- Olivier de Kersauson -+-
Le Mon, 24 Jun 2019 19:53:55 +0000, Nicolas George a écrit :
Jo Engo , dans le message <pan$bd161$c8240b45$4aea2fd8$, a écrit :
http:// ne matche pas la regesp
Au pif, https?:// devrait débloquer la situation.
I don't think so. En fait $img est défini là : foreach my $chunk (split (/n/, $body)) { my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six); next unless defined ($img); $img =~ s///gs; $img = "//" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img" unless ($img =~ m/^http/s); je crois que la couille est là où j'ai souligné. -- Je n'ai pas souvent assisté à des course de spermatozoïdes, mais j'ai donné beaucoup de départs. -+- Olivier de Kersauson -+-
Jo Engo
Le Mon, 24 Jun 2019 20:08:56 +0000, Jo Engo a écrit :
Remplacé par : $img = "//$img" unless ($img =~ m@^/@s); qui me semble plus disons logique et quine, je n'ai plus d'erreur (mais je ne comprends pas le unless, qui me fait un cours ?) --
Boarf, tu sais, pour mon Canon un sac poubelle suffit...
Pierrôt... Chuis choqué la tu vois :) -+- Daniel, sur fr.rec.photo -+-
Le Mon, 24 Jun 2019 20:08:56 +0000, Jo Engo a écrit :
Remplacé par :
$img = "//$img" unless ($img =~ m@^/@s);
qui me semble plus disons logique et quine, je n'ai plus d'erreur (mais
je ne comprends pas le unless, qui me fait un cours ?)
--
Boarf, tu sais, pour mon Canon un sac poubelle suffit...
Pierrôt... Chuis choqué la tu vois :)
-+- Daniel, sur fr.rec.photo -+-
Remplacé par : $img = "//$img" unless ($img =~ m@^/@s); qui me semble plus disons logique et quine, je n'ai plus d'erreur (mais je ne comprends pas le unless, qui me fait un cours ?) --
Boarf, tu sais, pour mon Canon un sac poubelle suffit...
Pierrôt... Chuis choqué la tu vois :) -+- Daniel, sur fr.rec.photo -+-
Jo Engo
Le Mon, 24 Jun 2019 20:08:56 +0000, Jo Engo a écrit :
En fait $img est défini là : foreach my $chunk (split (/n/, $body)) { my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six); next unless defined ($img); $img =~ s///gs; $img = "//$img" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img" unless ($img =~ m/^http/s); je crois que la couille est là où j'ai souligné.
Bon maintenant j'ai ça : http://https://live.staticflickr.com/31337/48119239236_d04d39c289.jpg ne matche pas la regesp Use of uninitialized value $id in concatenation (.) or string at ./ webcollage line 2162. NB j'ai tapé : my $id ; unless (($id) = ($img =~ m@/d+/(d+)_([da-f]+))) { print STDERR "$img ne matche pas la regespn"; au lieu de "$img doesn't match regexp" la correction est toujours à faire dans les lignes que j'ai citée ci- dessus, mais là je ne sais pas faire. -- M U S E U M E S S E M U E S U M -- Schulz, Rémi
Le Mon, 24 Jun 2019 20:08:56 +0000, Jo Engo a écrit :
En fait $img est défini là :
foreach my $chunk (split (/n/, $body)) {
my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six);
next unless defined ($img);
$img =~ s/\//gs;
$img = "//$img" unless ($img =~ m@^/@s);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$img = "http:$img" unless ($img =~ m/^http/s);
je crois que la couille est là où j'ai souligné.
Bon maintenant j'ai ça :
http://https://live.staticflickr.com/31337/48119239236_d04d39c289.jpg ne
matche pas la regesp
Use of uninitialized value $id in concatenation (.) or string at ./
webcollage line 2162.
NB j'ai tapé :
my $id ;
unless (($id) = ($img =~ m@/d+/(d+)_([da-f]+)_@si)) {
print STDERR "$img ne matche pas la regespn";
au lieu de "$img doesn't match regexp"
la correction est toujours à faire dans les lignes que j'ai citée ci-
dessus, mais là je ne sais pas faire.
--
M U S E
U M E S
S E M U
E S U M
-- Schulz, Rémi
Le Mon, 24 Jun 2019 20:08:56 +0000, Jo Engo a écrit :
En fait $img est défini là : foreach my $chunk (split (/n/, $body)) { my ($img) = ($chunk =~ m@"displayUrl": *"(.*?)"@six); next unless defined ($img); $img =~ s///gs; $img = "//$img" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img" unless ($img =~ m/^http/s); je crois que la couille est là où j'ai souligné.
Bon maintenant j'ai ça : http://https://live.staticflickr.com/31337/48119239236_d04d39c289.jpg ne matche pas la regesp Use of uninitialized value $id in concatenation (.) or string at ./ webcollage line 2162. NB j'ai tapé : my $id ; unless (($id) = ($img =~ m@/d+/(d+)_([da-f]+))) { print STDERR "$img ne matche pas la regespn"; au lieu de "$img doesn't match regexp" la correction est toujours à faire dans les lignes que j'ai citée ci- dessus, mais là je ne sais pas faire. -- M U S E U M E S S E M U E S U M -- Schulz, Rémi
Olivier Miakinen
Le 25/06/2019 10:52, Jo Engo a écrit :
Bon maintenant j'ai ça : http://https://live.staticflickr.com/31337/48119239236_d04d39c289.jpg ne
^^^^^^^^^^^^^^^ C'est volontaire ? -- Olivier Miakinen
Le 25/06/2019 10:52, Jo Engo a écrit :
Bon maintenant j'ai ça :
http://https://live.staticflickr.com/31337/48119239236_d04d39c289.jpg ne
Ben c'est de l'anglais... unless c'est l'inverse de if. Et c'est une garde en fin de ligne, donc syntaxe "inversee". En vrai, il n'y a pas besoin des parentheses du coup: $img = "//$img" unless $img =~ m@^/@s;
In article <pan$7bd91$6bfbb728$77e7d8a$27bb337f@icite.fr>,
Jo Engo <yl@icite.fr> wrote:
Ben c'est de l'anglais... unless c'est l'inverse de if.
Et c'est une garde en fin de ligne, donc syntaxe "inversee".
En vrai, il n'y a pas besoin des parentheses du coup:
$img = "//$img" unless $img =~ m@^/@s;
Ben c'est de l'anglais... unless c'est l'inverse de if. Et c'est une garde en fin de ligne, donc syntaxe "inversee". En vrai, il n'y a pas besoin des parentheses du coup: $img = "//$img" unless $img =~ m@^/@s;
Olivier Miakinen
Pendant que j'y pense... Le 25/06/2019 à 10:52, Jo Engo a écrit :
[...] ne matche pas la regexp [...]
Si tu as des problèmes de mise au point des regexp, et que ce n'est pas dû à un problème de syntaxe perl, tu peux poser ta question expurgée du code perl dans fr.comp.lang.regexp -- Olivier Miakinen
Pendant que j'y pense...
Le 25/06/2019 à 10:52, Jo Engo a écrit :
[...] ne matche pas la regexp [...]
Si tu as des problèmes de mise au point des regexp, et que ce
n'est pas dû à un problème de syntaxe perl, tu peux poser ta
question expurgée du code perl dans fr.comp.lang.regexp
Pendant que j'y pense... Le 25/06/2019 à 10:52, Jo Engo a écrit :
[...] ne matche pas la regexp [...]
Si tu as des problèmes de mise au point des regexp, et que ce n'est pas dû à un problème de syntaxe perl, tu peux poser ta question expurgée du code perl dans fr.comp.lang.regexp -- Olivier Miakinen
Jo Engo
Le Tue, 25 Jun 2019 14:49:05 +0200, Olivier Miakinen a écrit :
Si tu as des problèmes de mise au point des regexp, et que ce n'est pas dû à un problème de syntaxe perl, tu peux poser ta question expurgée du code perl dans fr.comp.lang.regexp
Merci mais il y a rien de difficile ou d'excitant concerbnant les regexp, il y a juste un problçme avec le code p.e.r.l. :) j'en suis là : { $img = "//$img" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img";} unless ($img =~ m/^http/s); estce correct syntaxiquement ? parce que j'intuite que ça résout mon problème (là le blob ajoute http:// devant https://good.uri ce qui n'est pas ce que je souhaite.) -- Il y a trois types de mathématiciens, ceux qui savent compter et ceux qui ne savent pas.
Le Tue, 25 Jun 2019 14:49:05 +0200, Olivier Miakinen a écrit :
Si tu as des problèmes de mise au point des regexp, et que ce n'est pas
dû à un problème de syntaxe perl, tu peux poser ta question expurgée du
code perl dans fr.comp.lang.regexp
Merci mais il y a rien de difficile ou d'excitant concerbnant les regexp,
il y a juste un problçme avec le code p.e.r.l. :)
estce correct syntaxiquement ? parce que j'intuite que ça résout mon
problème (là le blob ajoute http:// devant https://good.uri ce qui n'est
pas ce que je souhaite.)
--
Il y a trois types de mathématiciens, ceux qui savent compter et ceux
qui ne savent pas.
Le Tue, 25 Jun 2019 14:49:05 +0200, Olivier Miakinen a écrit :
Si tu as des problèmes de mise au point des regexp, et que ce n'est pas dû à un problème de syntaxe perl, tu peux poser ta question expurgée du code perl dans fr.comp.lang.regexp
Merci mais il y a rien de difficile ou d'excitant concerbnant les regexp, il y a juste un problçme avec le code p.e.r.l. :) j'en suis là : { $img = "//$img" unless ($img =~ m@^/@s); ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ $img = "http:$img";} unless ($img =~ m/^http/s); estce correct syntaxiquement ? parce que j'intuite que ça résout mon problème (là le blob ajoute http:// devant https://good.uri ce qui n'est pas ce que je souhaite.) -- Il y a trois types de mathématiciens, ceux qui savent compter et ceux qui ne savent pas.
Jo Engo
Le Tue, 25 Jun 2019 14:47:23 +0000, Jo Engo a écrit :
J'ai galéré à débusquer le loup, en fait j'ai fait comme qui dirait l'inverse, parce que je n'ai pas compris pourquoi ça voulait pas (et perl me trouvait des erreurs 1000 lignes plus loin). Vous auriez pu m'aider sur ce coup là les perliers :) -- Avant de choisir le prénom d'un garçon, pensez toujours à la femme qui aura a le murmurer plus tard. -+- Jules Barbey D'Aurevilly (1808-1889) -+-
Le Tue, 25 Jun 2019 14:47:23 +0000, Jo Engo a écrit :
J'ai galéré à débusquer le loup, en fait j'ai fait comme qui dirait
l'inverse, parce que je n'ai pas compris pourquoi ça voulait pas (et perl
me trouvait des erreurs 1000 lignes plus loin). Vous auriez pu m'aider
sur ce coup là les perliers :)
--
Avant de choisir le prénom d'un garçon, pensez toujours à la femme qui
aura a le murmurer plus tard.
-+- Jules Barbey D'Aurevilly (1808-1889) -+-
J'ai galéré à débusquer le loup, en fait j'ai fait comme qui dirait l'inverse, parce que je n'ai pas compris pourquoi ça voulait pas (et perl me trouvait des erreurs 1000 lignes plus loin). Vous auriez pu m'aider sur ce coup là les perliers :) -- Avant de choisir le prénom d'un garçon, pensez toujours à la femme qui aura a le murmurer plus tard. -+- Jules Barbey D'Aurevilly (1808-1889) -+-
