Ejemplo de lenguaje perl

Hola este tipo de lenguaje perl es un lenguaje scirpt de primer nivel que existe hoy en dia.

En este siguiente ejemplo se meustra el uso de condicionadores tipicos
como el if y else,
Tambien se mostrara la usabilidad  le los arreglos en perl
que en mi opinion es un poko mas facil que en el lenguaje c

Bueno aqui les dejo el codijo:
//aqui se hace mencion de donde se encuetra el script
#! /usr/bin/env perl -w

// Como guardar una variable pero no es necesario declarar la variable como sucede en c
  print "Hola. ¿Cómo te llamas?\n";
  $nombre=<STDIN>;
chop($nombre);

  if ($nombre eq "")
  {
    print 'por que no pones algun nombre'."\n";
  }
  else
  {
   print "Hola $nombre, yo me llamo ALEJANDRO. \n";
  }


  print "Hola. que numero del arreglo quieres saber\n";
  $n=<STDIN>;
chop($n);
// aqui se declaro el arreglo pero habes  de poner "$" peor se pone "@" para mencionar que es un arreglo
  my @arreglo;


  @arreglo=(1,"dos",3,"cuatro");


  $arreglo[4]=5.5;


  print "El numero $n es= ".$arreglo[$n]." \n";

Imagen: