PERL extraction

sbouli Messages postés 208 Statut Membre -  
sbouli Messages postés 208 Statut Membre -
Bonjour,

je ne comprend pas pourquoi le code suivant ne fonctionne pas 
$email_to=$paquet->{$id_ligne}{email_to};
print "\temail_to : ".$email_to."\n";
$debut_email = $email_to =~ /(.*)@/;
print "\tdebut_email : ".$debut_email."\n";


resultat :
email_to : superemail@domaine.fr
debut_email : 1

j attendais : superemail dans $debut_email

.....

merci de votre aide
stephane

1 réponse

Réponse 1 / 1
sbouli Messages postés 208 Statut Membre 2
 
solution 

$email_to=$paquet->{$id_ligne}{email_to};
print "\temail_to : ".$email_to."\n";
($debut_email) = $email_to =~ /(.*)@/;
print "\tdebut_email : ".$debut_email."\n";
0

Discussions similaires

Winrar - Problème extraction volume précédent
Yoruic -
NeiluJ -

19 réponses
Erreur des dossiers compressés
Lutty-Chan -
gbinforme -

1 réponse
probleme d'extraction winrar/winzip
Ayor23 -
0696939132 -

27 réponses
Le dossier compressé n'est pas valide
Cunegonde36 -
Malekal_morte- -

1 réponse
Désinstallation impossible
SuperPat -
Jolebarjo -

4 réponses