Concernant cette ligne
$pwd = $_[2].$_[0].$_[1];
Use of uninitialized value in concatenation (.) or string at ./monscript.pl line 101
Alors que plus haut j'ai bien spécifié
$prenom = $_[0];
$nom = $_[1];
$groupe = $_[2];
Je ne comprends pas!!
$pwd = $_[2].$_[0].$_[1];
$prenom = $_[0];
$nom = $_[1];
$groupe = $_[2];
#!/usr/bin/perl -w
open (LISTE, "while (my $ligne = ) {
next unless my ($nom, $prenom, $group) =
$ligne =~ /"([^"]+[^"])",\s*"([^"]+)",\s*"([^"]+)"/g;
print "$group$prenom$nom\n";
}
#!/bin/sh #Pour appeler le fichier. cat villes.csv | while read ligne do #Pour extraire chaque élément et les mettre dans des variables différentes. pays=`echo $ligne | tr -d \" | cut -d',' -f1 | cut -c1-3` ville=`echo $ligne (…)