Acme :: Pythonic :: Funções funções semelhantes a python para perl
Baixe Agora

Acme :: Pythonic :: Funções Classificação e resumo

Acme :: Pythonic :: Funções Tag

Pitão Módulo Perl. perl funções funções Python

Acme :: Pythonic :: Funções Descrição

Funções semelhantes a Python para Perl A linguagem de programação "Python" oferece algumas funções básicas de string, lista e outras, que podem ser usadas com bastante intuação. Perl geralmente usa expressões regulares ou variáveis especiais para essas tarefas. Embora as funções de Perl sejam em geral mais flexíveis e poderosas, elas são um pouco mais difíceis de usar e um pouco mais difícil de ler para os seres humanos. Acme :: Pythonic :: Funções é um módulo Perl que tenta imitar algumas funções do Python em Perl. Portanto, talvez os programadores de Python, mudando para Perl ou programação - iniciantes poderiam se sentir um pouco mais confortáveis com eles.synopsisthe script "exemplo.pl" mostra o uso das funções. Uma versão pronta a corrida, pode ser encontrada nos "exemplos" -diretório na bola de alcatrão do módulo: use Acme :: Pythonic :: Funções; # Se você usar Perl 5, Versão 5.10 ou superior, altere o caractere # Comentário nos dois seguintes "Usar" -statements: Use Perl6 :: Dicle; # Use o recurso 'dizer'; Diga "cordas:"; $ a = "olá"; se (EndSwith ($ a, "ello")) {dizer "$ a termina com" ello ". '; } Se (ISIN ($ A, "LL", "S")) {Diz "" LL "está em $ a. '; } $ a = "2345"; if (isdigit ($ a)) {dizer "$ a é um dígito". } $ a = "linha"; Diga lstrip ($ a); $ a = substituir ($ a, linha "," outra linha "); Diga $ a; Diga RStrip ($ a); $ a = "olá"; if (startswith ($ a, "ele")) {dizer "$ a começa com" ele ". '; } Diga len ($ A, "S"); dizer; Diga "listas:"; @a = ("A", "B", "C"); $ b = "d"; @a = anexar (@a, $ b); Saylist (@a); @a = ("A", "B", "C"); @b = (1, 2, 3); @a = estender (@a, @b); Saylist (@a); if (isin (@a, "c", "l") {dizer "" c "está em @a. '; } @a = inserir (@a, 1, "A2"); Saylist (@a); diga len (@a, "l"); @a = remove (@a, "a2"); Saylist (@a); dizer; Diga "hashes:"; % a = ("A" => 1, "B" => 2, "c" => 3); if (has_key (% a, "c")) {dizer "% a tem uma chave" C ". '; } Se (ISIN (% A, "C", "H")) {dizer "% a tem uma chave" C ". '; } dizer; Diga "relacionado ao arquivo:"; if (isdir ("/ home / user")) {diga "é diretório". } if (isfile ("/ home / user / myfile")) {diga "é arquivo". } @a = ("A \ n", "b \ n", "c \ n"); if (isfile ("test12345.txt")) {dizer "arquivo" test12345.txt "já existe. Nada feito. '; } else {writefile ("test12345.txt", @a); @c = readfile ("test12345.txt"); por $ i (@c) {$ i = rstrip ($ i); Imprimir $ i. ""; } dizer; } dizer; Diga "relacionado ao sistema:"; Diga OSName (); Sub Saylist {por $ i (@_) {Imprimir $ i. ""; } dizer; } No "Exemplos" -diretário mencionado acima, há também uma versão Pythonic-Perl deste script chamado "perlpyex.pl" e um script python correspondente chamado "pyex.py" para comparação. Requisitos: · Perl.

Acme :: Pythonic :: Funções Software Relacionado