ACME :: Pythonic :: Functies

Python-achtige functies voor PERL
Download nu

ACME :: Pythonic :: Functies Rangschikking & Samenvatting

Advertentie

  • Rating:
  • Vergunning:
  • Perl Artistic License
  • Prijs:
  • FREE
  • Naam uitgever:
  • Hauke Lubenow
  • Uitgever website:
  • http://search.cpan.org/~hlubenow/

ACME :: Pythonic :: Functies Tags


ACME :: Pythonic :: Functies Beschrijving

Python-achtige functies voor Perl Het programmeertaal "Python" biedt een aantal eenvoudige string-, lijst- en andere functies, die vrij intuatief kunnen worden gebruikt. Perl gebruikt vaak regelmatig uitdrukkingen of speciale variabelen voor deze taken. Hoewel de functies van PERL in het algemeen flexibeler en krachtiger zijn, zijn ze iets moeilijker te gebruiken en een beetje moeilijker om te lezen voor menselijke wezens. ACME :: Pythonic :: Functies is een Perl-module die probeert enkele van de functies van Python in Perl na te bootsen. Misschien kunnen Python-programmeurs omschakelen naar PERL of PROGRAMMERING-BEGINNERS zich een beetje comfortabeler met hen voelen. SynopsISHet het volgende script "Voorbeeld.pl" toont het gebruik van de functies. Een kant-en-klare versie van het is te vinden in de "Voorbeelden" -Directory in de tar-ball van de module: gebruik ACME :: Pythonic :: Functies; # Als u PERL 5, versie 5.10 of hoger gebruikt, wijzigt u het # commentaar-teken in de twee volgende "gebruik" -Statements: Gebruik Perl6 :: Say; # Gebruik functie 'zeggen'; zeg "snaren:"; $ A = "Hallo"; Als (Endswith ($ A, "Ello"))) {zeg '$ A-uiteinden met "Ello".'; } if (isin ($ a, "ll", "S")) {zeg 'll' is in $ a. '; } $ A = "2345"; if (isdigit ($ A)) {zeg '$ A is een cijfer.'; } $ A = "LINE"; zeg lstrip ($ A); $ A = Vervang ($ A, "lijn", "een andere regel"); zeg $ A; Zeg de rstrip ($ A); $ A = "Hallo"; if (startswith ($ a, "hij")) {zeg '$ A begint met "hij".'; } Zeg LEN ($ A, "S"); zeggen; Zeg "Lijsten:"; @A = ("A", "B", "C"); $ b = "d"; @A = APPEND (@A, $ B); Saylist (@A); @A = ("A", "B", "C"); @B = (1, 2, 3); @A = Extend (@A, @b); Saylist (@A); if (isin (@a, "C", "L")) {zeg '"C" is in @a.'; } @a = insert (@a, 1, "A2"); Saylist (@A); zeg Len (@a, "L"); @A = Verwijderen (@A, "A2"); Saylist (@A); zeggen; Zeg "Hashes:"; % A = ("A" => 1, "B" => 2, "C" => 3); if (has_key (% a, "c")) {zeg '% a heeft een sleutel "C".'; } if (isin (% a, "c", "H")) {zeg '% a heeft een sleutel "C".'; } zeggen; Zeg "Bestand-gerelateerd:"; if (ISDIR ("/ home / user")) {zeg "is directory."; } if (isfile ("/ home / user / myfile")) {zeg "is bestand."; } @a = ("a \ n", "b \ n", "C \ n"); if (isfile ("test12345.txt"))) {zeg 'bestand "test12345.txt" bestaat al. Niets gedaan. '; } anders {writefile ("test12345.txt", @A); @c = leesfile ("test12345.txt"); voor $ i (@c) {$ i = rstrip ($ i); Print $ i. ""; } zeggen; } zeggen; Zeg "Systeemgerelateerd:"; zeg ONNAME (); SUBSLAG {voor $ i (@_) {print $ i. ""; } zeggen; } In de hierboven genoemde "voorbeelden" -directory is er ook een pythonic-perl-versie van dit script genaamd "Perlpyex.pl" en een bijbehorende Python-Script genaamd "Pyex.py" ter vergelijking. Vereisten: · Perl


ACME :: Pythonic :: Functies Gerelateerde software