11.Operadores

+    Suma
-     Resta
*     Multiplicacion
/     Division
%     Modulacion
&     AND,  a nivel de bits
|     OR, a nivel de bits
&&    AND, y logico
||    OR logico
,     Separador de comas
..    Operadore de rango de lista
**    Exponenciacion (el valor de la izq se eleva a la potencia de la derecha)
=~    Coincidencia de patrones (comprueba si los elementos son verdaderos)
?~    Coincidencia de patrones (comprueba si los elementos son falsos)
<< >> Operadores de esplazamiento
?and: Operador condicional "juntos"
++ Autoincremento
-- Autodecremento

_____________________________________________

gt    Mayor que
lt    Menor que
eq    Igual a
le    Menor o igual que
ge    Mayor o igual que
ne    Distinto a
cmp   Retorno de comparacion

_____________________________________________

>     Mayor que
<     Menor que
==    Igual a  " comparando es distinto a = que es asignacion "
<=    Menor o igual a
>=    Mayor o igual a
!=    Distinto a
<=>   Retorno de comparacion

_____________________________________________

\a   Pitido
\b   Retroceso
\e   Escape
\E   Acaba con \Q, \L y \U
\f   Salto de pagina
\l   El siguiente caracter estara en minuscula
\L   Todos los siguientes caracteres estaran en mayusculas
\n   Linea nueva
\Q   Introduce una barra inversa en trosos los caracteres siguientes no alfanumericos
\r   Retorno de carro
\t   Tabulador
\u   El siguiente caracter estara en mayuscula
\U   Todos los siguientes caracteres estaran en mayuscula
\v   Tabulador vertical
\007 Caracter de timbre en octal
\x07 Caracter de timbre en hexadecimal
\cC  Ctrl+C

13.Bucles While y For...

Bien, en este capitulo, aprenderemos while y for, sentencias muy usadas, y for, una sentencia que ya hemos visto en el Mail bomber en este mismo subforo.

La sintaxis de while es:

while (condicion)
   {
      (sentencia que se cumple)
   }

Por ejemplo, un ejemplo simple de entendimiento rapidito:

#!/usr/bin/perl
$erik = 1;
while($erik <=50)
{
print "Este es el mensaje numero $erik\n";
$erik++;
}

Ya sabemos como va While, ahora nos vamos con Don For.

Aqui vemos la sintaxis de for:

for (valor de variable; condicion; expresion de control)
{
(sentencia)
}

Y aqui el ejemplo final de for:

#!/usr/bin/perl
for ($erik=1;$erik<10;$erik++)
{
print "Este es el numero $erik";
}

Ahora, aparte de lo basico de siempre, os voy a ense?ar un par de tecnicas para el bucle for, aver si os sirve:

Como nos saltamos 1 numero:

#!/usr/bin/perl
   for ($erik=1;$erik<10;$erik++)
   {
     if ($erik==5) #Cuando llegue a 5
     {
       next; #pasa al 6
     }
     print "$erik\n";
   }
 

Esto haria que cuando llege al numero cinco, ese numero, no lo imprima y pase directamente del 4 al 6.

Y ahora, algo que sirve para joder mucho a la gente en el sentido hack.
Un bucle infinito =).

#!/usr/bin/perl
for(;;)
{
 print "You are Fucked!\n";
}
 

14.Subrutinas

Las subrutinas es un trozo de código que se puede llamar en cualquier y momento, y que es necesario que este en uso para poder complementar un código perl por funciones.
Os lo explicare con mis propias palabras, en un codigo que se puede llamar cuando lo necesites.

Aqui la sintaxis:

#!/usr/bin/perl
sub nombre_de_la_subrutina
{
(sentencia)
}
 

Y para llamarlas usaremos el caracter &, por ejemplo

#!/usr/bin/perl
sub erik
{
print "Hola\n";
}
&erik;
print "Adios";
 

O tambien la podemos llamar mediante el:

#!/usr/bin/perl
sub erik
{
print "Hola\n";
}
erik();
print "Adios";
 

mi_subrutina();

16.Variables locales y globales

Definici?n de perl.org:
Por defecto  todas las variables estan definidas de forma global, es decir
se puede acceder a ellas desde cualquier punto de un programa, pero es po-
sible que queramos que solo afecte a un trozo de codigo,  para ello usare-
mos la clave "local" que localiza una variable dentro de un trozo de codi-
go y "my" que se suele usar mas  y es mas recomendable, sirve  para decla-
rar variables en un trozo de codigo como puede ser una subrutina

#!/usr/bin/perl
sub erik
{
my $nombre = "erik";
print "Admin: $nombre\n";
}
my $admin = "Admin";
print "$admin: erik\n";
&erik;
 

18.Begin End & Goto

Podemos hacer que se ejecute algo al principio de todo teniendo  prioridad
ante los demas, y  todo gracias a  BEGIN y con END podemos tener  el mismo
resultado pero en este caso se ejecutara al final.

Por ejemplo:

#!/usr/bin/perl
print "2\n";
BEGIN {print "1\n"}
END {print "4\n"}
print "3\n";
 

Esto si no tubieras el begin y el end mostraria: 2 1 4 3
Pero gracias al begin y end muestra: 1 2 3 4

Y luego GOTO, que es una sentencia que lo que hace es ir hacia una parte del código que ya ha sido repetida o que esta en el final, o donde queramos, sintaxis:

#!/usr/bin/perl
Inicio:
print "Volvemos al inicio";
goto Inicio;

Esto imprimiria Volvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicioVolvemos al inicio

Infinitas de veces hasta que el PCLI se petara (Perl Command Line Interpreter).