Thanks, Sir Peter

I used your idea and Ya it working goods =-P 

On Tue, 18 Feb 2003, Peter Eisengrein wrote:

> Is it possible that PE-456-987 may be pe-456-987 or Pe-456-987 or
> pE-456-987? If so, then your match would need to be 
> 
> if ($cedula =~ /$linea[2]/i)
> 
> -----Original Message-----
> From: Ing. Ricardo Cumberbatch L. (PANNet - URC)
> [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, February 18, 2003 9: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

Reply via email to