Lingua:: EN:: WordsToNumbers is module Perl die aantallen in het Engels worden geschreven in daadwerkelijke aantallen om te zetten.

Deze module is een omslag OO voor Lingua:: EN:: Words2Nums, die zeer aardig is, maar heeft een ongelukkige naam (die niet wanneer youre zoekend CPAN naar modules helpt die woorden in aantallen veranderen).

SYNOPSIS

gebruik Lingua:: EN:: WordsToNumbers;

mijn $numberizer = Lingua:: EN:: WordsToNumbers->new;

druk $numberizer->parse („Tweeënveertig“); # „42“

$numberizer->debug (1); # zuiver
$numberizer->debug (undef); # zuiver weg

$numberizer->billion (10 ** 12); # gebruik het „Engels miljard“

METHODES

nieuw
mijn $numberizer = Lingua:: EN:: WordsToNumbers->new;
Geeft u een nieuw „voorwerp“. Doet werkelijk veel niet.

ontleed
druk $numberizer->parse („Tweeënveertig“); # „42“
Een alias voor Lingua:: EN:: De methode van Words2Numss words2nums. Lees dat modulesdocumentatie om te zien hoe het werkt. U kunt deze methode als words2nums ook roepen als u werkelijk aan wilt.

zuiver
$numberizer->debug (1);
Plaats Lingua:: EN:: Words2Nums zuiveren wijze. De ware waarden zijn, weg is iets anders.

miljard
$numberizer->billion (10 ** 12);
Bepaal de waarde van miljard ($Lingua:: EN:: Words2Nums:: miljard).

Lingua:: EN:: Sleutelwoorden:: Yahoo het kan haalt automatisch sleutelwoorden uit tekst gebruikend Yahoo! API.

SYNOPSIS

gebruik Lingua:: EN:: Sleutelwoorden:: Yahoo qw (sleutelwoorden);

mijn @keywords = sleutelwoorden ($text);
of
mijn @keywords = sleutelwoorden ($text, $query);
Waar $query een facultatieve termijn is met het extractieprocédé te helpen.

Dit gebruikt Yahoo! sleutelwoorden API om sleutelwoorden uit tekst te halen.

Om Yahoo! te citeren pagina: De „term Dienst van het Web van de Extractie verstrekt een lijst van significante die woorden of uitdrukkingen uit een grotere inhoud worden gehaald.“

Het reserve project voegt onmiddellijke versiecontrole aan om het even welk dossier op een systeem van Unix toe.

Zo veel haat u *.bak en *.20050101 en *.cjn (uw initialen hier) en *.do.not.touch- dossiers zoals ik? Zij maken een rommel van uw filesystem wanneer iemand (en waren allen schuldig van het) een dossier moet steunen theyre werkend aan.

Maar wie ooit terugkomt en schoonmaakt knoei omhoog? Op welk punt wordt een oud gesteund dossier niet meer vereist? en wat ongeveer wanneer u dat reservebestand nodig hebt slechts te ontdekken om dat zijn het missen, of u niet ving omdat u geen rommel wilde toevoegen? De steun is mijn antwoord aan dat alles. Het voegt onmiddellijk beschikbare, betrouwbare versiecontrole aan elk dossier in filesystem toe.

De steun is een lichtgewichtinterface aan de bibliotheek van de Ontwrichting svn_fs. Het gebruikt de krachtige software van de versiecontrole als achterste deel aan eenvoudig en minimalistic (hoewel efficiënt) gebruikersinterface. Het wordt ontworpen voor gebruik op de systemen van Linux/van Unix (met inbegrip van OS X) als methode om configuratiedossiers te archiveren die semi-vaak veranderen, maar noodzakelijk rechtvaardigt hun eigen mechanisme of bewaarplaats van de versiecontrole niet. Dingen zoals „/etc/hosts“ of „httpd.conf“.

Het kan tot een steun van om het even welk dossier zonder het moeten het invoeren eerst, zonder zich het ongerust maken over vestigings nieuwe bewaarplaatsen, en (omdat het rechtstreeks aan de laag FS) spreekt zonder het een rommel maken van verborgen „.svn“ (of zelfs slechtere, zichtbare „CVS“) folders helemaal over de plaats leiden. Het doet dit door één enkel globaal „archief te gebruiken,“ dat een filesystem bevat die uw wortel weerspiegelt aangezien u aan het toevoegt. U kunt het archief bekijken en dossiers herstellen, zoals vereist diffs, en bewegingsdingen rond. Voor complexer beleid, is het archief een standaard het dossiersysteem van de Ontwrichting dat met om het even welke compatable cliënt (met inbegrip van de de lijnhulpmiddelen van het svnbevel) kan worden beheerd.

De huidige versie wordt geklopt samen in Perl. Zijn alpha-, maar het is vrij functioneel… op zijn minst voor een bewijs van concept. Uiteindelijk van plan ben ik om het in C te herschrijven… maar wij allen zijn van de „het best gelegde plannen op de hoogte.“ In het gemiddelde terwijl, de versie Perl… meestal werkt. De enige echte truc is dat u de banden van de Ontwrichting voor het compileren en moet installeren Perl. Er zijn een andere modules u kunt eveneens wensen, maar theyre al vrij standaard.

Gebruik:

Indien u waarschijnlijk niet als u youre doend het opdracht-kritieke werk. Zijn nog alpha- code na-helemaal. Maar als u beslist het een rotatie te geven, beschuldig me van geen breuk (het enige ding dat bestaande dossiers zou moeten beschadigen is de combinatie van - r en - o, die tijdens herstelt zal beschrijven).

Lingua:: EN:: Verbuig is een module Perl die enkelvoud in meervoud kan omzetten. Selecteer „a“ of „“.

SYNOPSIS

gebruik Lingua:: EN:: VERBUIG QW (PL PL_N PL_V PL_ADJ GEEN NUM
PL_eq PL_N_eq PL_V_eq PL_ADJ_eq

PART_PRES
ORD NUMWORDS
verbuig klassiek
def_noun def_verb def_adj def_an def_a);


# VORM ONVOORWAARDELIJK HET MEERVOUD

druk het „Meervoud van“, $word, „is“, PL ($word), „n“;


# VORM VOORWAARDELIJK HET MEERVOUD

druk „ik zag $cat_count“, PL („kat“, $cat_count), „n“;


# DE MEERVOUDEN VAN DE VORM VOOR SPECIFIEKE WOORDSOORTEN

druk PL_N („I“, $N1), PL_V („zaag“, $N1),
PL_ADJ („mijn“, $N2), PL_N („zaag“, $N2), „n“;


# BEHANDEL „0/1/N“ - > VERTALING „no/1/N“:

druk „daar“, PL_V (, „was“ GEEN $errors), (“ fout ", $errors), „n“;


# TELT HET GEBREK VAN HET GEBRUIK:

druk NUM ($N1, ""), PL („I“), PL_V (“ zaag "), NUM ($N2), PL_N („zaag“);
druk „daar“, NUM ($errors,), PL_V („was“), GEEN (“ fout "), „n“;


# VERGELIJK „AANTAL-INTENSIEF“ TWEE WOORDEN:

de druk „samen“ als PL_eq ($word1, $word2);
druk „zelfde nounn“ als PL_eq_N ($word1, $word2);
druk „zelfde verbn“ als PL_eq_V ($word1, $word2);
druk „zelfde adj.n“ als PL_eq_ADJ ($word1, $word2);


# VOEG CORRECTE „A TOE“ OF „“ VOOR EEN BEPAALD WOORD:

de druk „u wilde“, A ($thing), „of“, ($idea), „n“;


# ZET CIJFERS IN ORDINALS (d.w.z. 1->1st, 2->2nd, 3->3rd, enz. om

druk „het“, ORD ($position),“ van leftn " was;

# De CIJFERS van de BEKEERLING AAN WOORDEN (d.w.z. 1-> " één ", 101-> " honderd één ", enz.)
# IN EEN SCALAIRE CONTEXT: KRIJG TERUG ÉÉN ENKEL KOORD…

$words = NUMWORDS (1234); # „duizend, twee honderd vierendertig“
$WORDS = NUMWORDS (ORD (1234)); # „duizend, twee honderd en dertig-vierde“


# IN EEN CONTEXT VAN DE LIJST: KRIJG een TERUG LIJST VAN STRINGSi, VOOR ELKE „BROK“…

@words = NUMWORDS (1234); # („duizend“, „twee honderd vierendertig“)


# VERANDEREN DE FACULTATIEVE PARAMETERS VERTALING:

$words = NUMWORDS (12345, group=>1);
# „één, twee, drie, vier, vijf“

$words = NUMWORDS (12345, group=>2);
# „twaalf, vierendertig, vijf“

$words = NUMWORDS (12345, group=>3);
# „één drieëntwintig, vijfenveertig“

$words = NUMWORDS (1234, and=>);
# „duizend, twee honderd vierendertig“

$words = NUMWORDS (1234, and=>, plus);
# „duizend, twee honderd, plus vierendertig“

$words = NUMWORDS (555_1202, group=>1, zero=>oh);
# „vijf, vijf, vijf, één, twee, oh, twee“

$words = NUMWORDS (555_1202, group=>1, one=>unity);
# „vijf, vijf, vijf, eenheid, twee, oh, twee“

$words = NUMWORDS (123.456, group=>1, decimal=>mark);
# „één twee drie teken vier vijf zes“


# VEREIS „KLASSIEKE“ MEERVOUDEN (B.V.: „nadruk“ - > " nadruk“, „cherubijn“ - > " cherubim“)

klassiek; # GEBRUIK ALLE KLASSIEKE MEERVOUDEN

klassieke 1; # GEBRUIK ALLE KLASSIEKE MEERVOUDEN
klassieke 0; # GEBRUIK ALLE MODERNE MEERVOUDEN (GEBREK)

klassieke nul; # „geen fout“ IN PLAATS VAN „geen fouten“
klassieke zero=>1; # „geen fout“ IN PLAATS VAN „geen fouten“
klassieke zero=>0; # „geen fouten“ IN PLAATS VAN „geen fout“

klassieke kudde; # „2 buffels“ IN PLAATS VAN „2 buffels“
klassieke herd=>1; # „2 buffels“ IN PLAATS VAN „2 buffels“
klassieke herd=>0; # „2 buffels“ IN PLAATS VAN „2 buffels“

klassieke personen; # „2 voorzitters“ IN PLAATS VAN „chairpeople 2“
klassieke persons=>1; # „2 voorzitters“ IN PLAATS VAN „chairpeople 2“
klassieke persons=>0; # „chairpeople 2“ IN PLAATS VAN „2 voorzitters“

klassieke oud; # „2 formules“ IN PLAATS VAN „2 formules“
klassieke ancient=>1; # „2 formules“ IN PLAATS VAN „2 formules“
klassieke ancient=>0; # „2 formules“ IN PLAATS VAN „2 formules“



# INTERPOLEER „PL ()“, „PL_N ()“, „PL_V ()“, „PL_ADJ ()“, A () „, „()“
# „NUM ()“ en „ORD ()“ BINNEN KOORDEN:

de druk verbuigt (het „Meervoud van $word is PL ($word) n“);
de druk verbuigt („ik zag $cat_count PL („kat“, $cat_count) n“);
de druk verbuigt („PL (I, $N1) PL_V (zaag, $N1) PL (a, $N2) PL_N (zaag, $N2)“);
de druk verbuigt („NUM ($N1,) PL (I) PL_V (zaag) NUM ($N2,) PL (a) PL_N (zaag)“);
de druk verbuigt („ik zag NUM ($cat_count) PL („kat“) nNUM ()“);
de druk verbuigt („daar PL_V (, was $errors) GEEN (fout, $errors) n“);
de druk verbuigt („daar NUM ($errors,) PL_V (was) GEEN (fouten) n“;
de druk verbuigt („wilde u A ($thing) of ($idea) n“);
de druk verbuigt („het was ORD ($position) van leftn“);


# VOEG USER-DEFINED VERBUIGINGEN (MET VOETEN TREDENDE INGEBOUWDE REGELS) TOE:

def_noun „VAX“ => „VAXen“; # BIJZONDER MEERVOUD =>

def_verb „zal“ => „zal“, # het 1ST BIJZONDERE MEERVOUD => van de PERSOON
„zal“ => „zal“, # het 2ND BIJZONDERE MEERVOUD => van de PERSOON
„zal“ => „zal“, # het 3RD BIJZONDERE MEERVOUD => van de PERSOON

def_adj „hir“ „hun“ =>, # BIJZONDER MEERVOUD =>

def_a „h“ # „AY HALWAYS SEZ HAITCH!“

def_an „horrendous.*“ # een „AFGRIJSELIJKE TOEWIJZING“

De uitvoerbare subroutines van Lingua:: EN:: Verbuig verstrekken meervoudsverbuigingen, „a“/een „“ selectie voor Engelse woorden, en manipulatie van aantallen als woorden

De vormen van het meervoud van alle zelfstandige naamwoorden, de meeste werkwoorden, en sommige bijvoeglijke naamwoorden worden verstrekt. Waar aangewezen, „klassieke“ varianten (bijvoorbeeld: de „broer“ - > „brethren“, „dogma“ - wordt > „dogmata“, enz.) ook verstrekt.

Op uitspraak-gebaseerde „a“/een „wordt“ selectie verstrekt voor alle Engelse woorden, en het meeste initialisms.
Het is ook mogelijk om cijfers (1.2.3) aan ordinals (eerste, tweede, derde) en aan Engelse woorden („één“, „twee“, „drie) te verbuigen.

Bij het produceren van deze verbuigingen, Lingua:: EN:: Verbuig volgt het Engelse Woordenboek van Oxford en de richtlijnen in Fowlers Modern Engels Gebruik, verkiezend de eerstgenoemden waar twee niet akkoord gaan.
De module wordt gebouwd rond standaard Britse spelling, maar ontworpen om aan gemeenschappelijke Amerikaanse varianten eveneens het hoofd te bieden. Het jargon, het jargon, en andere Engelse dialecten worden niet uitdrukkelijk verzorgd.

Waar twee of meer verbogen vormen voor één enkel woord (typisch een „klassieke“ vorm en een „moderne“ vorm) bestaan, Lingua:: EN:: Verbuig verkiest de gemeenschappelijkere vorm (typisch „moderne“), tenzij de „klassieke“ verwerking is gespecificeerd (zie „MODERN VERSUS KLASSIEKE VERBUIGINGEN“).

Mozilla:: De steun is een module Perl als reservenut voor profielen Mozilla.

SYNOPSIS

$moz = Mozilla:: Backup->new ();
$file = $moz->backup_profile („firefox“, „gebrek“);

Dit pakket verstrekt een eenvoudige interface om de profielen van op mozillabetrekking hebbende toepassingen zoals Firefox of Thunderbird te steunen en te herstellen.

De vraag van de methode kan genoemde of positionele parameters (genoemd vraag worden geadviseerd) gebruiken. De methodes zijn hieronder geschetst:

nieuw

$moz = Mozilla:: Backup->new (%options);

Cre