[perl] Lo que enviaste... (fwd)

[Salvador Ortiz Garcia]

On Mon, 24 Apr 2000, Gunnar Wolf wrote:

> Hola!
> 
> Soy el administrador de la lista de Perl. Enviaste un mensaje, pero no
> estas subscrito con esta direccion a la lista, por lo que fue rechazado.
> Creo que yo te lo puedo responder... Pero de todos modos, te sugiero
> subscribirte.
> 
> Mando este mensaje con copia a la lista, pues puede ser de interes para
> otros, y otros pueden encontrar mejores respuestas.
> 
> > Hola a todos, 
> > Dentro de un ciclo while necesito imprimir una linea
> > blanca y otra gris, para esto se me ocurre hacerlo con
> > un contador de linea y ver si es par o impar...
> >  
> > de casualidad alguien tiene alguna rutina o función
> > para saber si un número es par o impar, por ejemplo si
> > en perl existiese la función mod() la cual me daria el
> > residuo de un número dividido entre otro, tendria algo
> > asi:
> > 
> >      if mod(numero,2)=0 {
> >          x="Es par";
> >       } else {
> >          x="Es impar"; }
> > 
> > Pero esa función no existe en perl, alguna idea o
> > sugerencia??? 

La función mod no, pero si el operador correspondiente  --->  %
$ perl -e 'print 3 % 2'
1
$ perl -e 'print 4 % 2'
0
$ perl -e 'print 5 % 2'
1
$ perl -e 'print 0 % 2'
0
$ perl -e 'print 1 % 2'
1
 

Saludos

Salvador Ortiz


--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl