[Perl] Mi Primer Programa en Perl

Salvador Ortiz Garcia sog en msg.com.mx
Dom Abr 23 01:47:07 CDT 2006


On Thu, 2006-04-20 at 21:08 -0500, Fredy Gonzales P. wrote:
> Bueno amigos, 
>  
> Estoy avanzando con mi primer programa en Perl para la lectura de
> archivos log , pero tengo un problema..
>  
> En una variable donde guardo lo que extraigo de una columna, a veces
> existe cero y en otras esta en blanco.
>  
> Para convertirlo a un valor fijo , en este caso si esta en blanco
> quiero dejarlo en 0 que funcion tendria que hacer.
>  
> Existe alguna funcion en la cual le consulte si la variable esta en
> blanco entonces que le coloque un 0, algo asi como esto
>  
> $var1= iif ( empty($var1),0,$var1)

Un simple:

 ... =  +$var1

Es suficiente, revisa 'unary +'.


Saludos

-- 
Salvador Ortiz Garcia <sog en msg.com.mx>
Matías Software Group



Más información sobre la lista de distribución Perl