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
