I Tried this myself but it worked for me. The one difference is that I specifically assigned matching values to the two variables. You might try putting
print "$cedula -- $linea[2]\n"; in in front of your if statement to make sure that split is splitting the string how you think it should be when alphas are present. Other than that I'm not sure what might be the problem. Matt Schneider Programmer/System Administrator SKLD Information Services, LLC -----Original Message----- From: Ing. Ricardo Cumberbatch L. (PANNet - URC) [mailto:[EMAIL PROTECTED]] Sent: Tuesday, February 18, 2003 7:51 AM To: [EMAIL PROTECTED] Subject: [Perl-unix-users] Sentences that not working right Hi Everybody, Sorry for my poor english, I create a cgi and a part of a sentences is not working well open (LECTOR, "$dataintro") || die "ERROR: NO Encuentro el archivo 'est_whois'\n"; while ($_ = <LECTOR>) { #PRIMER WHILE chomp; @linea = split; #$ced = split (/\//, $linea[2]); if ($cedula =~ $linea[2]) { . . . When my variable $cedula have the value of 8-456-789 and $linea[2] have the semathing the result is good it display right. But when my variable $cedula have de value PE-456-987 and $linea[2] is to be the same, it not display any result, it display me nothing. I tried to change using the sign "eq" but pass the samething if I use =~ Thanks for your helps _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
