Manual de PERL

CAPITULO 2


I. Entrada/Salida

    Hasta ahora sólo hemos estudiado el tipo de variables. En este capítulo vamos a estudiar el modo de capturar/mostrar esos valores a través del teclado/pantalla.

    La instrucción básica para mostrar el valor de las variables en pantalla es print.

    Nuestro primer programa en PERL,  podría ser este:

    print "Hola Perl";

   Su salida en pantalla sería: Hola Perl.

Existen muchos modificadores para la salida de los valores de las variables. A continuación vamos a estudiar algunas de ellos.

  "\n"    Nueva línea.
  "\t"    Tabulacíon.
  "\r"    Retorno de carro.
  "\f"    Nueva hoja (formfeed).
  "\b"   Espacio atrás  (backspace).
  "\e"   Secuencia de ESCape.
  "\u"   Pasa a mayúscula el primer caracter de texto siguiente".
  "\U"   Pasa a mayúscula todo el texto siguiente".
  "\l"    Pasa a minúscula el primer caracter de texto siguiente".
  "\L"   Pasa a minúscula todo el texto siguiente.
  "\E"   Fin del efecto de los modificadores \U,\L.
  "\a"    Emite un pitido.
  "\cC"  Combinación de Control+Letra. En este caso Control-C .
  xN    el signo por (x) seguido de un número N repite un caracter o texto anterior N veces.

    Algunos ejemplos del efecto de estos modificadores serían estos:

  print "Hola PERL \n"; Su salida es: Hola PERL seguido de nueva línea.
  print "\UHola Perl"; Su salida es: HOLA PERL.
  print "\lHola \LPERL \n"; Su salida es: hola perl seguido de nueva línea.
  print3x4; Muestra: 3333. NO CONFUNDIR x con el operador * (multiplicar).
  print "Hola "x3. Muestra:Hola Hola Hola Hola.



Los operadores aritméticos son modificadores que sólo afectan a los valores númericos:

  print 3 + 4; Imprime el resultado de la Suma de 3 y 4.
  print 4 - 3; Imprime el resultado de la Resta de 4 y 3.
  print 3 * 4; Imprime el resultado de la Multiplicación de 3 por 4.
  print 8 / 4; Imprime el resultado de la División de 8 entre 4.
  print 3 ** 3; Imprime el resultado de la Elevación de 3 al cubo.
  print 4 % 2; Imprime el resultado del Módulo de 4.



Lo realmente particular del lenguaje PERL es el método que usa para la entrada de datos desde el teclado. Para asignar un valor desde el teclado a una variable, se asigna a la variable la representación del teclado <STDIN> (STandarDINput).
Ej: $var=<STDIN> .

  print "¿Cómo te llamas?: ";
  $nombre=<STDIN>;
  print "Tu nombre es:$nombre";

    Este pequeño programa pide un nombre de persona y su resultado final es: Tu nombre es: seguido de ese nombre.

 

Existe una función asociada a la entrada de datos desde el teclado  que suele usarse para eliminar el último caracter de la entrada, normalmente nueva línea.

    chop(...): elimina el último caracter de una entrada por teclado.Ej: $nombre=chop($nombre);
 
 
 
 
Página anterior
Inicio de página
Página siguiente