Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
perl
#perl 5.22.1 print "Hello World\n"; @cliente1 = ('jonathan','hernandez','infante'); @cliente2 = ('carlos','eduardo','briano'); @clientes = (\@cliente1,\@cliente2); print $clientes[0][0]; =begin comment if($clientes[0][0]eq'jonathan') { print "true"; } else { print "false" } =cut =operators igualdad == igual a numeros ! = no igual a <=> Comprueba si el valor de dos operandos es igual o no, y devuelve -1, 0 o 1, dependiendo de si el argumento de la izquierda es numéricamente menor, igual o mayor que el argumento de la derecha. comparador de string lt es verdadero si la primera cadena es mayor alfabeticamente que la segunda gt es verdadero si la segunda cadena es mayor alfabeticamente que la primera le es verdadero si la primera cadena es mayor o igual alfabeticamente a la segunda ge es verdadero si la segunda cadena es mayor o igual alfabeticamente a la primera eq es verdadero si la primera cadena es igual a la segunda ne es verdadero si la primera cadena es diferente a la segunda cmp devueve -1 si la primera cadena es mayor a la segunda 0 si son iguales 1 si la segunda cadena es mayor a la primera & and && | or || ^ xor not . concatenador x repetidor .. secuencia ++ incremento -- decremento =cut =funciones sub Funcion{ if ($_[1] == 1){ print "hola"; } else{ print "adios"; } } Funcion(1,2,3); =cut
run
|
edit
|
history
|
help
0
palindromic dates
Attractive Numbers
2
Array_with_join_function
Hash Refrence for memory optimization
hashes
Reference
matrx travarsal
Lieta 101733
base N conversion