Acme :: Pythonic :: Funciones Funciones similares a Python para Perl
Descargar ahora

Acme :: Pythonic :: Funciones Clasificación y resumen

Acme :: Pythonic :: Funciones Etiquetas

Pitón Módulo perl perla funciones Funciones de Python

Acme :: Pythonic :: Funciones Descripción

Funciones similares a Python para Perl El lenguaje de programación "Python" ofrece algunas funciones básicas de cadena, lista y otras, que se pueden usar de manera bastante intuativa. Perl a menudo utiliza expresiones regulares o variables especiales para estas tareas. Aunque las funciones de Perl son en general más flexibles y poderosas, son ligeramente más difíciles de usar y un poco más difícil de leer para los seres humanos. Acme :: Pythonic :: Funciones es un módulo Perl que intenta imitar algunas de las funciones de Python en Perl. Por lo tanto, quizás los programadores de Python, cambiando a Perl o Programación, los principiantes podrían sentirse un poco más cómodos con ellos. Siguiendo el siguiente script "example.pl" muestra el uso de las funciones. Una versión lista para su ejecución se puede encontrar en los "Ejemplos" -Directory en la bola de alquitrán del Módulo: Use Acme :: Pythonic :: Funciones; # Si usa PERL 5, versión 5.10 o superior, cambie el carácter # comentario en los dos siguientes "Uso": estadaje: Use Perl6 :: Diga; # uso de la característica 'decir'; Di "cadenas:"; $ a = "hola"; if (endswith ($ A ", ello")) {Di '$ A finaliza con "Ello".'; } Si (Isin ($ A, "LL", "S")) {Di '"LL" está en $ a.'; } $ a = "2345"; if (isdigit ($ a)) {Di '$ a es un dígito'; } $ a = "linea"; decir lstrip ($ a); $ a = Reemplazar ($ A, "Línea", "Otra línea"); decir $ a; decir rstrip ($ a); $ a = "hola"; Si (Startswith ($ A ", él"))) {Di '$ A comienza con "él".'; } Decir LEN ($ A, "S"); decir; Di "listas:"; @a = ("A", "B", "C"); $ b = "d"; @a = apéndice (@a, $ b); Saylist (@a); @a = ("A", "B", "C"); @b = (1, 2, 3); @a = extender (@a, @b); Saylist (@a); if (Isin (@a, "C", "L")) {Di '"C" está en @A.'; } @A = Insertar (@a, 1, "A2"); Saylist (@a); decir len (@a, "l"); @a = eliminar (@a, "A2"); Saylist (@a); decir; decir "hashes:"; % a = ("a" => 1, "B" => 2, "C" => 3); if (has_key (% a "," c ")) {Di '% a tiene una clave" C ".'; } Si (Isin (% a "," C "," H ")) {DIGA '% A tiene una clave" C ".'; } decir; Di "relacionado con el archivo:"; if (isdir ("/ home / usuario")) {Di "es directorio"; } IF (IsFile ("/ Home / User / MyFile")) {Di "es archivo"; } @A = ("A \ N", "B \ N", "C \ N"); if (isfile ("test12345.txt")) {Di 'File "test12345.txt" ya existe. Nada hecho.'; } else {writefile ("test12345.txt", @a); @c = readfile ("test12345.txt"); por $ i (@c) {$ i = rstrip ($ i); Imprimir $ i. "" } decir; } decir; Decir "relacionado con el sistema:"; decir osname (); Sub Saylist {por $ i (@_) {impresión $ i. "" } decir; } En los "Ejemplos" -Directory mencionado anteriormente, también hay una versión de Pythonic-Perl de este script llamado "perlpyex.pl" y un python-script correspondiente llamado "pyex.py" para comparación. Requisitos: · Perl

Acme :: Pythonic :: Funciones Software relacionado