Result:
found more than 678 distributions - search limited to the first 2001 files matching your query
( run in 1.841 )
App-Greple-wordle
view release on metacpan or search on metacpan
lib/App/Greple/wordle/NYT.pm view on Meta::CPAN
aduki adult adunc adust advew advts adyta adyts adzed adzes aecia aedes aeger
aegis aeons aerie aeros aesir aevum afald afanc afara afars afear affix affly
afion afire afizz aflaj aflap aflow afoam afoot afore afoul afret afrit afros
after aftos again agals agama agami agamy agape agars agasp agast agate agaty
agave agaze agbas agene agent agers aggag agger aggie aggri aggro aggry aghas
agidi agila agile aging agios agism agist agita aglee aglet agley agloo aglow
aglus agmas agoge agogo agone agons agony agood agora agree agria agrin agros
agrum agued agues aguey aguna agush aguti ahead aheap ahent ahigh ahind ahing
ahint ahold ahole ahull ahuru aidas aided aider aides aidoi aidos aiery aigas
aight ailed aimag aimak aimed aimer ainee ainga aioli aired airer airns airth
airts aisle aitch aitus aiver aixes aiyah aiyee aiyoh aiyoo aizle ajies ajiva
ajuga ajupa ajwan akara akees akela akene aking akita akkas akker akoia akoja
akoya aksed akses alaap alack alala alamo aland alane alang alans alant alapa
alaps alarm alary alata alate alays albas albee albid album alcea alces alcid
alcos aldea alder aldol aleak aleck alecs aleem alefs aleft aleph alert alews
aleye alfas algae algal algas algid algin algor algos algum alias alibi alick
alien alifs align alike alims aline alios alist alive aliya alkie alkin alkos
alkyd alkyl allan allay allee allel allen aller alley allin allis allod allot
allow alloy allus allyl almah almas almeh almes almud almug alods aloed aloes
aloft aloha aloin alone along aloof aloos alose aloud alowe alpha altar alter
altho altos alula alums alumy alure alurk alvar alway amahs amain amari amaro
lib/App/Greple/wordle/NYT.pm view on Meta::CPAN
geeps geese geest geist geits gelds gelee gelid gelly gelts gemel gemma gemmy
gemot genae genal genas genes genet genic genie genii genin genio genip genny
genoa genom genre genro gents genty genua genus geode geoid gerah gerbe geres
gerle germs germy gerne gesse gesso geste gests getas getup geums geyan geyer
ghast ghats ghaut ghazi ghees ghest ghost ghoul ghusl ghyll giant gibed gibel
giber gibes gibli gibus giddy gifts gigas gighe gigot gigue gilas gilds gilet
gilia gills gilly gilpy gilts gimel gimme gimps gimpy ginch ginga ginge gings
ginks ginny ginzo gipon gippo gippy gipsy girds girlf girls girly girns giron
giros girrs girsh girth girts gismo gisms gists gitch gites giust gived given
giver gives gizmo glace glade glads glady glaik glair glamp glams gland glans
glare glary glass glatt glaum glaur glaze glazy gleam glean gleba glebe gleby
lib/App/Greple/wordle/NYT.pm view on Meta::CPAN
retem retia retie retin retip retox retro retry reune reups reuse revel revet
revie revow revue rewan rewax rewed rewet rewin rewon rewth rexes rezes rhabd
rheas rheid rheme rheum rhies rhime rhine rhino rhody rhomb rhone rhumb rhyme
rhymy rhyne rhyta riads rials riant riata riato ribas ribby ribes riced ricer
rices ricey riche richt ricin ricks rider rides ridge ridgy ridic riels riems
rieve rifer riffs riffy rifle rifte rifts rifty riggs right rigid rigmo rigol
rigor rikka rikwa riled riles riley rille rills rilly rimae rimed rimer rimes
rimon rimus rince rinds rindy rines ringe rings ringy rinks rinse rioja rione
riots rioty riped ripen riper ripes ripps riqqs risen riser rises rishi risks
risky risps rists risus rites rithe ritts ritzy rival rivas rived rivel riven
river rives rivet riyal rizas roach roads roady roake roaky roams roans roany
lib/App/Greple/wordle/NYT.pm view on Meta::CPAN
straw bleep mossy hotel irate venom windy donut cower enter folly earth whirl
barge fiend crone topaz droop flyer tonic flank burly froze whale hobby wheel
heart disco ethos curly bathe style tenth beget party chart anode polyp brook
bully lover empty hello quick wrath snaky index scrub amiss exact magma quest
beach spice verve wordy ocean choir peace write caper audio bride space onion
await giddy birch gnash dwell rouse lucky quote older whisk clear rayon exert
angel music frank close snare stone brush carol right rocky loyal smile coach
azure daddy beret merry while spurt bunch chime viola binge truth snail skunk
knelt uncle agent leaky graph adult mercy splat occur smirk given tempo cause
retry pique noble mason phony grail bleak noise until ardor mania flare trade
limit ninja glaze leash actor meant green sassy sight trust tardy think queue
lib/App/Greple/wordle/NYT.pm view on Meta::CPAN
borne alarm folio shuck suede grift drone sport polar quash idiom habit rough
preen admin cease datum edify reuse lease board taffy plaid vixen bilge ghost
quail petty prank munch curio taupe glade thrum oddly elite comfy offer plain
stump witty blink moldy incur poppy curve baler atria stilt dread novel jumpy
brand exile gnome undid foist nervy modal loris sword blank tizzy burnt water
quake gofer haunt whole savvy omega assay frill banjo daunt lumpy rigid stork
groan coral imbue nasal minty south nomad kefir knell level matte lousy issue
rowdy llama extol ratty union spore mirth annex tower split graft elate petal
least might fetch blend drift bulge tenor chirp trick pouty chair throb nadir
noisy along lefty teeth knife later defer coven quill mouth blunt drape dally
fritz gooey civil geese spoil width spasm relay plane amuse nylon annoy hardy
App-Greple-xlate
view release on metacpan or search on metacpan
i18n/src/xlate.deepl-ET.pod view on Meta::CPAN
=head1 DESCRIPTION
B<Greple> B<xlate> moodulid leiavad soovitud tekstilõigud ja asendavad need tõlgitud tekstiga. Peamine mootor on GPT-5.5 (F<llm/gpt5.pm>), mis kutsub välja käsu L<llm|https://llm.datasette.io/>; Samuti on kaasatud DeepL (F<deepl.pm>) ja vanemad B...
Tõlked salvestatakse failipõhiselt vahemällu, seega ei maksa muutumatu teksti puhul käsu uuesti käivitamine midagi. Dokumendi redigeerimisel saadetakse API-le uuesti ainult muudetud lõigud; kontekstist lähtuv mootor saab ka ümbritsevad tõlke...
Kui soovite tõlkida tavalisi tekstilõike dokumendis, mis on kirjutatud Perli pod-stiilis, kasutage käsku B<greple> koos moodulitega C<--xlate-engine gpt5> ja C<perl> järgmiselt:
greple -Mxlate --xlate-engine gpt5 -Mperl --pod --re '^([\w\pP].*\n)+' --all foo.pm
i18n/src/xlate.deepl-ET.pod view on Meta::CPAN
<img width="750" src="https://raw.githubusercontent.com/kaz-utashiro/App-Greple-xlate/main/images/format-conflict.png">
</p>
Kui soovite tõlkida kogu teksti, kasutage valikut B<--match-all>. See on otsetee, et määrata muster C<(?s).+>, mis vastab kogu tekstile.
Konfliktimärkide formaadis andmeid saab vaadata kõrvuti, kasutades käsku L<sdif|App::sdif> koos valikuga C<-V>. Kuna stringide kaupa pole mõtet võrrelda, on soovitatav kasutada C<--no-cdif> valikut. Kui teil ei ole vaja teksti värvida, määrak...
sdif -V --no-filename --no-tc --no-cdif data_shishin.deepl-EN-US.cm
=for html <p>
<img width="750" src="https://raw.githubusercontent.com/kaz-utashiro/App-Greple-xlate/main/images/sdif-cm-view.png">
i18n/src/xlate.deepl-ET.pod view on Meta::CPAN
Mõnikord on tekstiosasid, mida te ei soovi tõlkida. Näiteks markdown-failide sildid. DeepL soovitab sellistel juhtudel konverteerida välja jäetav tekstiosa XML-tähtedeks, tõlkida ja pärast tõlkimise lõpetamist taastada. Selle toetamiseks on...
--xlate-setopt maskfile=MASKPATTERN
See tõlgendab faili C<MASKPATTERN> iga rida regulaarse väljendina, tõlgib sellega sobivad stringid ja taastab pärast töötlemist. Ridadega, mis algavad C<#>, ei arvestata.
Keerukaid mustreid saab kirjutada mitmele reale, kasutades tagasikaldkriipsuga eskapitud reavahetust.
Seda, kuidas tekst on maskeerimise abil muudetud, saab näha valiku B<--xlate-mask> abil.
Maskimine kaitseb märgistust tõlkimise eest. Tundlike stringide varjamiseks tõlketeenuse enda eest vaadake L</ANONYMIZATION AND TEMPLATES>; mõlemat saab kasutada koos.
See liides on eksperimentaalne ja võib tulevikus muutuda.
=head1 ANONYMIZATION AND TEMPLATES
Tundlikud stringid saab varjata enne nende saatmist tõlke-API-le ja taastada väljundis. Anonüümimise reegleid on saadaval kolmest allikast: sõnastikufailist (B<--xlate-anonymize>), dokumendis endas olevatest sisseehitatud märgetest (B<--xlate-a...
Vormidokumentide puhul (kvartaliaruanded jms) määrake osalised eelnevalt kindlaks ja viidake neile tekstis:
---
å ±å‘Šè€…: 山田太郎
i18n/src/xlate.deepl-ET.pod view on Meta::CPAN
Initsialiseerige uue dokumendi vahemälu teise dokumendi vahemälufaili põhjal. Kasulik perioodiliste aruannete puhul: algandmetena kasutage uue väljaande vahemälus eelmise väljaande andmeid, nii et muutmata lõikeid ei tõlgita uuesti ja muudetu...
=item B<--xlate-anonymize>=I<file>
Anonüümistage tundlikud stringid enne nende saatmist tõlke-API-le ja taastage need väljundis. Sõnastikufailis on iga elemendi kohta üks kanne: JSON-vormingus (kanoniline, masinloetav)
[ { "category": "person", "text": "山田太郎" },
{ "category": "company", "regex": "アクメ(æ ªå¼ä¼šç¤¾)?" } ]
või lihtsas ridaformaadis (C<category pattern>, C</.../> regulaaravaldiste jaoks). Iga kirje asendatakse kategooriasildiga, näiteks C<< <person id=1 /> >>; sama string saab alati sama sildi, nii et mudel saab jälgida, kes on kes. Tundmatuid JSON-v...
Sõnastiku saab genereerida välise tööriistaga – näiteks tundlikke entiteete eraldava kohaliku mudeliga:
llm -m <local-model> \
-s 'Extract sensitive entities as a JSON array of objects
App-Hako
view release on metacpan or search on metacpan
lib/App/Hako.pm view on Meta::CPAN
my ($box, @cmd) = @_;
usage() unless $box and @cmd;
chdir $box or die "cannot enter $box: $!\n";
my $uid = $>;
my ($gid) = split " ", $);
syscall(SYS_unshare, $NS);
map_my_id($uid, $gid);
bind_mount($box, $ENV{HOME});
chdir or die "cannot go home: $!\n";
exec @cmd;
die "exec failed: $!\n";
}
lib/App/Hako.pm view on Meta::CPAN
my $dummy = "ignore me";
syscall(SYS_mount, $src, $tgt, $dummy, MS_BIND, $dummy);
}
sub map_my_id {
my ($uid, $gid) = @_;
proc_write(setgroups => "deny");
proc_write(uid_map => "$uid $uid 1");
proc_write(gid_map => "$gid $gid 1");
}
sub proc_write ($$) {
my ($file, $data) = @_;
open my $pf, ">", "/proc/self/$file" or die "cannot open $file: $!\n";
App-I18N
view release on metacpan or search on metacpan
lib/App/I18N.pm view on Meta::CPAN
=head2 Auto Translation
Auto translate via Google Translate REST API:
Default backend is google translate REST API, This will translate zh\_TW.po file and translate msgid (en\_US)
to msgstr (zh\_TW):
$ po auto zh_TW --from en_US
$ po auto zh_CN --from en_US --to zh_CN
App-Ikachan
view release on metacpan or search on metacpan
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#0088cc), to(#0077b3));
background-image: -webkit-linear-gradient(top, #0088cc, #0077b3);
background-image: -o-linear-gradient(top, #0088cc, #0077b3);
background-image: linear-gradient(to bottom, #0088cc, #0077b3);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff0088cc', endColorstr='#ff0077b3', GradientType=0);
}
.dropdown-menu > .active > a,
.dropdown-menu > .active > a:hover,
.dropdown-menu > .active > a:focus {
bin/ikachan view on Meta::CPAN
background-image: -webkit-linear-gradient(top, #0088cc, #0077b3);
background-image: -o-linear-gradient(top, #0088cc, #0077b3);
background-image: linear-gradient(to bottom, #0088cc, #0077b3);
background-repeat: repeat-x;
outline: 0;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff0088cc', endColorstr='#ff0077b3', GradientType=0);
}
.dropdown-menu > .disabled > a,
.dropdown-menu > .disabled > a:hover,
.dropdown-menu > .disabled > a:focus {
bin/ikachan view on Meta::CPAN
.dropdown-menu > .disabled > a:focus {
text-decoration: none;
cursor: default;
background-color: transparent;
background-image: none;
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.open {
*z-index: 1000;
}
bin/ikachan view on Meta::CPAN
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
border-bottom-color: #b3b3b3;
-webkit-border-radius: 4px;
-moz-border-radius: 4px;
border-radius: 4px;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffffffff', endColorstr='#ffe6e6e6', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
*zoom: 1;
-webkit-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.2), 0 1px 2px rgba(0, 0, 0, 0.05);
-moz-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.2), 0 1px 2px rgba(0, 0, 0, 0.05);
box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.2), 0 1px 2px rgba(0, 0, 0, 0.05);
}
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #0088cc, #0044cc);
background-image: linear-gradient(to bottom, #0088cc, #0044cc);
background-repeat: repeat-x;
border-color: #0044cc #0044cc #002a80;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff0088cc', endColorstr='#ff0044cc', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-primary:hover,
.btn-primary:focus,
.btn-primary:active,
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #fbb450, #f89406);
background-image: linear-gradient(to bottom, #fbb450, #f89406);
background-repeat: repeat-x;
border-color: #f89406 #f89406 #ad6704;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#fffbb450', endColorstr='#fff89406', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-warning:hover,
.btn-warning:focus,
.btn-warning:active,
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #ee5f5b, #bd362f);
background-image: linear-gradient(to bottom, #ee5f5b, #bd362f);
background-repeat: repeat-x;
border-color: #bd362f #bd362f #802420;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffee5f5b', endColorstr='#ffbd362f', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-danger:hover,
.btn-danger:focus,
.btn-danger:active,
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #62c462, #51a351);
background-image: linear-gradient(to bottom, #62c462, #51a351);
background-repeat: repeat-x;
border-color: #51a351 #51a351 #387038;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff62c462', endColorstr='#ff51a351', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-success:hover,
.btn-success:focus,
.btn-success:active,
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #5bc0de, #2f96b4);
background-image: linear-gradient(to bottom, #5bc0de, #2f96b4);
background-repeat: repeat-x;
border-color: #2f96b4 #2f96b4 #1f6377;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff5bc0de', endColorstr='#ff2f96b4', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-info:hover,
.btn-info:focus,
.btn-info:active,
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #444444, #222222);
background-image: linear-gradient(to bottom, #444444, #222222);
background-repeat: repeat-x;
border-color: #222222 #222222 #000000;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff444444', endColorstr='#ff222222', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.btn-inverse:hover,
.btn-inverse:focus,
.btn-inverse:active,
bin/ikachan view on Meta::CPAN
background-repeat: repeat-x;
border: 1px solid #d4d4d4;
-webkit-border-radius: 4px;
-moz-border-radius: 4px;
border-radius: 4px;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffffffff', endColorstr='#fff2f2f2', GradientType=0);
*zoom: 1;
-webkit-box-shadow: 0 1px 4px rgba(0, 0, 0, 0.065);
-moz-box-shadow: 0 1px 4px rgba(0, 0, 0, 0.065);
box-shadow: 0 1px 4px rgba(0, 0, 0, 0.065);
}
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #f2f2f2, #e5e5e5);
background-image: linear-gradient(to bottom, #f2f2f2, #e5e5e5);
background-repeat: repeat-x;
border-color: #e5e5e5 #e5e5e5 #bfbfbf;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#fff2f2f2', endColorstr='#ffe5e5e5', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
-webkit-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
-moz-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
}
bin/ikachan view on Meta::CPAN
background-image: -webkit-linear-gradient(top, #222222, #111111);
background-image: -o-linear-gradient(top, #222222, #111111);
background-image: linear-gradient(to bottom, #222222, #111111);
background-repeat: repeat-x;
border-color: #252525;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff222222', endColorstr='#ff111111', GradientType=0);
}
.navbar-inverse .brand,
.navbar-inverse .nav > li > a {
color: #999999;
bin/ikachan view on Meta::CPAN
background-image: -o-linear-gradient(top, #151515, #040404);
background-image: linear-gradient(to bottom, #151515, #040404);
background-repeat: repeat-x;
border-color: #040404 #040404 #000000;
border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff151515', endColorstr='#ff040404', GradientType=0);
filter: progid:DXImageTransform.Microsoft.gradient(enabled=false);
}
.navbar-inverse .btn-navbar:hover,
.navbar-inverse .btn-navbar:focus,
.navbar-inverse .btn-navbar:active,
bin/ikachan view on Meta::CPAN
background-image: linear-gradient(to bottom, #f5f5f5, #f9f9f9);
background-repeat: repeat-x;
-webkit-border-radius: 4px;
-moz-border-radius: 4px;
border-radius: 4px;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#fff5f5f5', endColorstr='#fff9f9f9', GradientType=0);
-webkit-box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
-moz-box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
}
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#149bdf), to(#0480be));
background-image: -webkit-linear-gradient(top, #149bdf, #0480be);
background-image: -o-linear-gradient(top, #149bdf, #0480be);
background-image: linear-gradient(to bottom, #149bdf, #0480be);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff149bdf', endColorstr='#ff0480be', GradientType=0);
-webkit-box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
-moz-box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
-webkit-box-sizing: border-box;
-moz-box-sizing: border-box;
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#ee5f5b), to(#c43c35));
background-image: -webkit-linear-gradient(top, #ee5f5b, #c43c35);
background-image: -o-linear-gradient(top, #ee5f5b, #c43c35);
background-image: linear-gradient(to bottom, #ee5f5b, #c43c35);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffee5f5b', endColorstr='#ffc43c35', GradientType=0);
}
.progress-danger.progress-striped .bar,
.progress-striped .bar-danger {
background-color: #ee5f5b;
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#62c462), to(#57a957));
background-image: -webkit-linear-gradient(top, #62c462, #57a957);
background-image: -o-linear-gradient(top, #62c462, #57a957);
background-image: linear-gradient(to bottom, #62c462, #57a957);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff62c462', endColorstr='#ff57a957', GradientType=0);
}
.progress-success.progress-striped .bar,
.progress-striped .bar-success {
background-color: #62c462;
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#5bc0de), to(#339bb9));
background-image: -webkit-linear-gradient(top, #5bc0de, #339bb9);
background-image: -o-linear-gradient(top, #5bc0de, #339bb9);
background-image: linear-gradient(to bottom, #5bc0de, #339bb9);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff5bc0de', endColorstr='#ff339bb9', GradientType=0);
}
.progress-info.progress-striped .bar,
.progress-striped .bar-info {
background-color: #5bc0de;
bin/ikachan view on Meta::CPAN
background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#fbb450), to(#f89406));
background-image: -webkit-linear-gradient(top, #fbb450, #f89406);
background-image: -o-linear-gradient(top, #fbb450, #f89406);
background-image: linear-gradient(to bottom, #fbb450, #f89406);
background-repeat: repeat-x;
filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#fffbb450', endColorstr='#fff89406', GradientType=0);
}
.progress-warning.progress-striped .bar,
.progress-striped .bar-warning {
background-color: #fbb450;
App-Iptables2Dot
view release on metacpan or search on metacpan
lib/App/Iptables2Dot.pm view on Meta::CPAN
ctstate=s
destination|d=s
destination-ports|dports=s
dport=s
dst-type=s
gid-owner=s
goto|g=s
helper=s
in-interface|i=s
icmp-type=s
jump|j=s
App-KGB
view release on metacpan or search on metacpan
script/kgb-add-project view on Meta::CPAN
[ sort { $a ne 'name' } keys %$_ ]
);
}
my $outfh = \*STDOUT;
my ( $uid, $gid, $mode );
if ($save) {
$uid = ( stat($file) )[4];
$gid = ( stat($file) )[5];
$mode = ( stat($file) )[2] & 07777;
if ( $dir and -d $dir ) {
$file = File::Spec->catdir($dir, "$prj.conf");
}
umask(~$mode & 0777);
script/kgb-add-project view on Meta::CPAN
}
print $outfh YAML::Dump($yaml);
if ($save) {
chown $uid, $gid, $file;
}
__END__
=head1 NAME
App-KeePass2
view release on metacpan or search on metacpan
lib/App/KeePass2.pm view on Meta::CPAN
my $root = $self->_fkp->add_group(
{ title => 'My Passwords',
icon => $self->get_icon_id_from_key('key')
}
);
my $gid = $root->{'id'};
$self->_fkp->add_group(
{ title => 'Internet',
group => $gid,
icon => $self->get_icon_id_from_key('internet')
}
);
$self->_fkp->add_group(
{ title => 'Private',
group => $gid,
icon => $self->get_icon_id_from_key('key5')
}
);
$self->_fkp->add_group(
{ title => 'Bank',
group => $gid,
icon => $self->get_icon_id_from_key('dollar')
}
);
$self->_fkp->unlock if $self->_fkp->is_locked;
my $master = $self->_get_master_key;
App-LDAP
view release on metacpan or search on metacpan
lib/App/LDAP/Command/Add/Group.pm view on Meta::CPAN
# {{{
sub run {
my ($self) = shift;
my $gid = next_gid();
my $groupname = $self->extra_argv->[2] or die "no group name specified";
die "group $groupname already exists" if App::LDAP::LDIF::Group->search(
base => config()->{nss_base_group}->[0],
lib/App/LDAP/Command/Add/Group.pm view on Meta::CPAN
);
my $group = App::LDAP::LDIF::Group->new(
base => $self->base // config()->{nss_base_group}->[0],
cn => [$groupname],
gidNumber => $gid->get_value("gidNumber"),
);
$group->memberUid( $self->member ) if $self->member;
$group->save;
$gid->replace(gidNumber => $gid->get_value("gidNumber")+1)->update(ldap());
$group;
}
# }}}
sub next_gid {
ldap()->search(
base => config()->{base},
filter => "(objectClass=gidnext)",
)->entry(0);
}
__PACKAGE__->meta->make_immutable;
no Moose;
App-LXC-Container
view release on metacpan or search on metacpan
lib/App/LXC/Container/Run.pm view on Meta::CPAN
my %configuration = (audio => '-',
command => [@_],
dir => $dir,
gateway => '',
gids => [],
init => '/initialisation/script/is/undefined',
ip => '',
mounts => {},
name => $container,
network => 0,
lib/App/LXC/Container/Run.pm view on Meta::CPAN
{
push @{$self->{uids}}, $1 if $1 > 0;
}
elsif (m|^\s*lxc\.idmap\s*=\s*g\s+(\d+)\s+\1\s+1$|)
{
push @{$self->{gids}}, $1 if $1 > 0;
}
elsif (m|^\s*lxc\.mount\.entry\s*=\s*(/\S+)\s|)
{
$self->{mounts}{$1} = 1;
}
lib/App/LXC/Container/Run.pm view on Meta::CPAN
# TODO: Should we distinguish UIDs/GIDs? For now we just simply
# add them all. This has the charm that files of other users
# within the same group will be visible with their names in
# directory listings. The disadvantage is making them known by
# name (but the password hashes are always safe):
foreach (@{$self->{uids}}, @{$self->{gids}})
{ $re_ids .= '|' . $_; }
foreach (ACCOUNT_FILES)
{
# remove first to be sure not to overwrite something linked:
if (-f $lxc_etc . $_)
lib/App/LXC/Container/Run.pm view on Meta::CPAN
my $xauth_add = 'xauth -b -f ' . $xauth . ' add ' . $entry;
system($xauth_add) == 0
or fatal('call_failed__1__2', $xauth_add, $?);
if ($self->{user} ne 'root')
{
my ($uid, $gid) = (getpwnam($self->{user}))[2..3];
chown $uid, $gid, $xauth_dir, $xauth;
}
}
return $container_path;
}
App-MHFS
view release on metacpan or search on metacpan
lib/MHFS/Plugin/GetVideo.pm view on Meta::CPAN
'ts' => unpack('s>', $rawts)
};
}
sub telmval {
my ($track, $stringid) = @_;
my $constname = "EBMLID_$stringid";
my $id = __PACKAGE__->$constname;
return $track->{$id}{'value'} // $track->{$id}{'data'};
#return $track->{"$stringid"}}{'value'} // $track->{$EBMLID->{$stringid}}{'data'};
}
sub trackno_is_audio {
my ($tracks, $trackno) = @_;
foreach my $track (@$tracks) {
App-MaMGal
view release on metacpan or search on metacpan
po/Makefile view on Meta::CPAN
refresh-pot:
rm -f mamgal.pot.new mamgal.pot.old
cd .. && (echo mamgal; grep 'pm$$' MANIFEST) | xgettext \
--add-comments=TRANSLATORS: \
--from-code=UTF-8 \
--msgid-bugs-address="Marcin Owsiany <marcin@owsiany.pl>" \
--package-name=mamgal --package-version=0.1 \
--copyright-holder="Marcin Owsiany <marcin@owsiany.pl>" \
-L Perl -d mamgal -o po/mamgal.pot.new -f -
mv mamgal.pot mamgal.pot.old
msgmerge mamgal.pot.old mamgal.pot.new > mamgal.pot
App-Manager
view release on metacpan or search on metacpan
dev => $stat[ 0],
ino => $stat[ 1],
mode => $stat[ 2],
nlink => $stat[ 3],
uid => $stat[ 4],
gid => $stat[ 5],
rdev => $stat[ 6],
size => $stat[ 7],
atime => $stat[ 8],
mtime => $stat[ 9],
ctime => $stat[10],
$samecontent = $stat->{symlink} eq readlink $stat->{path};
}
$msg = "attributes changed" if $samecontent;
if ($samecontent
&& $stat->{uid} eq $nstat->{uid}
&& $stat->{gid} eq $nstat->{gid}
&& $stat->{size} eq $nstat->{size}
&& ($level > 0 || $stat->{mtime} eq $nstat->{mtime})) {
$msg = "no change";
delete $self->{storage}{$stat->{id}};
delete $self->{source}{$stat->{path}};
die "FATAL: don't know how to check in $stat->{path}.\n";
}
unless (S_ISLNK $stat->{mode}) {
chmod $stat->{mode} & 07777,$stat->{path}
or die "Unable to change mode for '$stat->{path}': $!\n";
chown $stat->{uid},$stat->{gid},$stat->{path}
or warn "Unable to change user and group id for '$stat->{path}': $!\n";
utime $stat->{atime},$stat->{mtime},$stat->{path}
or warn "Unable to change atime and mtime for '$stat->{path}': $!\n";
}
}
App-MechaCPAN
view release on metacpan or search on metacpan
lib/App/MechaCPAN.pm view on Meta::CPAN
=over
=item 1. Confirm the shape of CHECKSUMS
C<CHECKSUMS> files contain all the files and the file checksums for a CPAN author's uploads. This file is compared against a rigid definition to ensure that it does not appear to be doing anything malicious.
=item 2. Confirm the signature of CHECKSUMS
Once the C<CHECKSUMS> structure has been examined, the embedded signature is verified. The C<CHECKSUMS> file is signed using the PAUSE Batch Signing Key (C<2E66 557A B97C 19C7 91AF 8E20 328D A867 450F 89EC>, accessible at L<https://www.cpan.org/modu...
App-Milter-Limit-Plugin-SQLite
view release on metacpan or search on metacpan
lib/App/Milter/Limit/Plugin/SQLite.pm view on Meta::CPAN
$self->_create_table($self->table);
}
# make sure the db file has the right owner.
my $uid = $self->config_get('global', 'user');
my $gid = $self->config_get('global', 'group');
if (defined $uid and defined $gid) {
my $db_file = $self->db_file;
chown $uid, $gid, $db_file or die "chown($db_file): $!";
}
}
sub child_init {
my $self = shift;
App-Milter-Limit
view release on metacpan or search on metacpan
lib/App/Milter/Limit/Config.pm view on Meta::CPAN
if (my $user = $$conf{user}) {
$$conf{user} = App::Milter::Limit::Util::get_uid($user);
}
if (my $group = $$conf{group}) {
$$conf{group} = App::Milter::Limit::Util::get_gid($group);
}
}
sub global {
App-Mimosa
view release on metacpan or search on metacpan
root/js/ext-3.3.1/ext-all.js view on Meta::CPAN
* Ext JS Library 3.3.1
* Copyright(c) 2006-2010 Sencha Inc.
* licensing@sencha.com
* http://www.sencha.com/license
*/
(function(){var h=Ext.util,k=Ext.each,g=true,i=false;h.Observable=function(){var l=this,m=l.events;if(l.listeners){l.on(l.listeners);delete l.listeners}l.events=m||{}};h.Observable.prototype={filterOptRe:/^(?:scope|delay|buffer|single)$/,fireEvent:fu...
/* SWFObject v2.2 <http://code.google.com/p/swfobject/>
is released under the MIT License <http://www.opensource.org/licenses/mit-license.php>
*/
var swfobject=function(){var F="undefined",t="object",U="Shockwave Flash",Y="ShockwaveFlash.ShockwaveFlash",s="application/x-shockwave-flash",T="SWFObjectExprInst",z="onreadystatechange",Q=window,l=document,v=navigator,V=false,W=[i],q=[],P=[],K=[],n,...
App-MojoSlides
view release on metacpan or search on metacpan
lib/App/MojoSlides/files/public/bootstrap-theme.min.css view on Meta::CPAN
.btn-default,.btn-primary,.btn-success,.btn-info,.btn-warning,.btn-danger{text-shadow:0 -1px 0 rgba(0,0,0,0.2);-webkit-box-shadow:inset 0 1px 0 rgba(255,255,255,0.15),0 1px 1px rgba(0,0,0,0.075);box-shadow:inset 0 1px 0 rgba(255,255,255,0.15),0 1px 1...
App-MonM
view release on metacpan or search on metacpan
lib/App/MonM/Channel/Command.pm view on Meta::CPAN
return 0;
}
my $phone = $self->message->recipient;
my $command_res = dformat($command, {
ID => $self->message->msgid,
TO => $self->message->to,
RCPT => $phone, RECIPIENT => $phone,
PHONE => $phone, NUM => $phone, TEL => $phone, NUMBER => $phone, MSISDN => $phone,
TIME => time(), DATETIME => date_time2dig(), DATE => date2dig(),
SUBJECT => $self->message->subject, SUBJ => $self->message->subject, SBJ => $self->message->subject,
App-MultiModule-Tasks-ResourceWatcher
view release on metacpan or search on metacpan
'cutime' => 0,
'ctime' => 0,
'flags' => '4194560',
'rss' => 16457728,
'size' => '58707968',
'gid' => 0,
'cttlflt' => 0,
'cmdline' => 'perl p3',
'utime' => '0.17',
'cpuid' => '3',
'threads' => '1',
App-Munner
view release on metacpan or search on metacpan
lib/App/Munner/Runner.pm view on Meta::CPAN
sub _build_sys_user_info {
my $self = shift;
my $user = $self->user;
my %info = ();
@info{qw( username password uid gid )} = getpwnam( $self->user )
or die "User ($user) is invalid\n";
return \%info;
}
has sys_uid => (
lib/App/Munner/Runner.pm view on Meta::CPAN
sub _build_sys_uid {
shift->sys_user_info->{uid};
}
has sys_gid => (
is => "ro",
isa => "Int",
builder => "_build_sys_gid",
);
sub _build_sys_gid {
shift->sys_user_info->{gid};
}
has log_dir => (
is => "ro",
isa => "Str",
lib/App/Munner/Runner.pm view on Meta::CPAN
pid_file => $self->pid_file,
stderr_file => $self->error_log,
stdout_file => $self->access_log,
fork => $self->fork_mode,
uid => $info->{uid},
gid => $info->{gid},
}
);
return $daemon;
}
lib/App/Munner/Runner.pm view on Meta::CPAN
or die "FIXME: Missing file name";
die "FIXME: file is not found"
if !-f $file;
my $info = $self->sys_user_info;
my $uid = $info->{uid};
my $gid = $info->{gid};
chown $uid, $gid, $file
or die "Unable to chown $file\n";
chmod 0700, $file
or die "Unable to chown $file to 0700\n";
}
App-Music-ChordPro
view release on metacpan or search on metacpan
lib/ChordPro/Files.pm view on Meta::CPAN
my $i = 0;
my @st = stat(_);
push( @files,
{ name => decode_utf8($File::Find::name =~ s;^\Q$ufolder\E/?;;r),
map { $_ => $st[$i++] }
qw{ dev ino mode nlink uid gid rdev size
atime mtime ctime blksize blocks }
} );
}
}, $ufolder;
App-Mxpress-PDF
view release on metacpan or search on metacpan
public/javascripts/ace/mode-apache_conf.js view on Meta::CPAN
regex: '\\b(?:CacheDefaultExpire|CacheDisable|CacheEnable|CacheForceCompletion|CacheIgnoreCacheControl|CacheIgnoreHeaders|CacheIgnoreNoLastMod|CacheLastModifiedFactor|CacheMaxExpire)\\b' },
{ token: 'keyword.cern_meta.apacheconf',
regex: '\\b(?:MetaDir|MetaFiles|MetaSuffix)\\b' },
{ token: 'keyword.cgi.apacheconf',
regex: '\\b(?:ScriptLog|ScriptLogBuffer|ScriptLogLength)\\b' },
{ token: 'keyword.cgid.apacheconf',
regex: '\\b(?:ScriptLog|ScriptLogBuffer|ScriptLogLength|ScriptSock)\\b' },
{ token: 'keyword.charset_lite.apacheconf',
regex: '\\b(?:CharsetDefault|CharsetOptions|CharsetSourceEnc)\\b' },
{ token: 'keyword.dav.apacheconf',
regex: '\\b(?:Dav|DavDepthInfinity|DavMinTimeout|DavLockDB)\\b' },
App-Netdisco
view release on metacpan or search on metacpan
2.025001 - 2014-04-08
[NEW FEATURES]
* Web and Backend daemons will restart when deployment.yml is updated
* Web and Backend daemons will drop privilege to same uid/gid as their
on-disk files (to allow run-control symlink as non-root)
[ENHANCEMENTS]
* Use daterange for IP Subnets (same as IP Inventory)
App-NoodlePay
view release on metacpan or search on metacpan
bin/noodlepay.pl view on Meta::CPAN
ru => [qw(0019 0819 0419)],
zh => [qw(0004 7804 0804 1004 7c04 0c04 1404 0404)]
);
require Win32::API;
Win32::API->Import('kernel32', 'int GetUserDefaultLCID()');
my $langid = GetUserDefaultLCID();
for my $l (keys %winlang) {
$lang = $l, last if grep { sprintf("%04x",$langid) eq $_ } @{$winlang{$l}};
}
}
else {
$lang = $ENV{LC_ALL} || $ENV{LANG};
}
App-Options
view release on metacpan or search on metacpan
lib/App/Options.pm view on Meta::CPAN
}
sub file_is_secure {
my ($file) = @_;
my ($secure, $dir);
my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks);
if ($^O =~ /MSWin32/) {
$secure = 1; # say it is without really checking
}
else {
$secure = $path_is_secure{$file};
if (!defined $secure) {
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks) = stat($file);
if (!($mode & 0400)) {
$secure = 0;
print "Error: Option file is not secure because it is not readable by the owner.\n";
}
elsif ($mode & 0077) {
lib/App/Options.pm view on Meta::CPAN
else {
$dir =~ s!/?[^/]+$!!;
while ($dir && $secure) {
$secure = $path_is_secure{$file};
if (!defined $secure) {
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks) = stat("$dir/."); # navigate symlink to the directory
if ($uid >= 100 && $uid != $>) {
$secure = 0;
print "Error: Option file is not secure because a parent directory is owned by a different user.\n";
print " Dir=[$dir]\n";
}
App-PDF-Link
view release on metacpan or search on metacpan
lib/App/PDF/Link/Icons/iRealPro.pm view on Meta::CPAN
5Zvvz63fun1nSBJEwjqYRid6A0AoKKtWfk6W9Og9f86LBPfhZ4ubX5r+bjVHOUwxQcfifByl
2B8Kmv+e/m6VqlksnH865YmXHhZFMSlitgYdquSRcMxtyKjTJ9355LSHZBmQJAKsWrcj+K83
3q7ieA7bwZOTa5ALyaqVn53levTeP+eldgD3r+nvVFGOYorDmWnH4pw2wPLqWtUtSXTIgHx3
KASQmRsf7/cb2rplixY6PA4YOsM/MzcXdfPfn7qXEPsssmyy/82aXasbJhCETzrjMihrVn52
tvTYvX/OTYuMnMzdB9xxObdLEsl7n3xVv31ngybwAKEgwLV/vuOPKRkZfSIMR/RL8MIfNM+6
9LeXDB09eFAoaD99n89f0rxx+86gIIrYQgidLI0hhIKKwvJyMl2P3ntrbmpKDKeEg8yfLWl+
efq71ZSnGBNy3K4BE4LaggHrzdmf1SFkZ4cnpHiiJk956M8OE84RKnQweJFSl3DdX/9+q6Hb
c1M1dQHjg8+/bpQE/qSbSQ3IspWXky0+fs+tOWkp0TY4CeCjuT+0vDT97RqOoxjj459j45Jc
ePGy1e0r1mwLShJAMABw3pXXXJpTUDQoHGXrKGy4g9RxAGCefdnvftNncM+eimxP88yZt6C5
prFZJxyHAWF0UjSMUVBVWUFOtvT43bfkpjkS53YBfPTF0pYXp79bzfGC7cd1wvUgjJHFAN79
9KsGXbNTDqNjOeHqW++5KSJYgiOlD3ewMAkAxFzxhzt+bxi21FVV+4x5C35okXiB7JP8cIK3
App-PDFLibrarian
view release on metacpan or search on metacpan
share/title_abbr_iso4.csv view on Meta::CPAN
"aanhangwagen";"n.a.";"dut"
"aanhouden-";"aanhoud.";"dut"
"äänit-";"n.a.";"fin"
"äänitluettelo";"äänitluett.";"fin"
"aankomende";"aankom.";"dut"
"aankoopgids";"n.a.";"dut"
"aanleid-";"aanleid.";"dut"
"aanneemouer";"n.a.";"afr"
"aannemer-";"aannem.";"dut"
"aanneming-";"aannem.";"dut"
"aanschaf";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"aeroespac-";"aeroesp.";"spa"
"aèrofizič-";"aèrofiz.";"rus"
"aèrofotosemka";"aèrofotos.";"rus"
"aèrogazodinam-";"aèrogazodin.";"rus"
"aèrogeolog-";"aèrogeol.";"rus"
"aèrogidrodinami-";"aèrogidrodin.";"rus"
"aèrohimi-";"aèrohim.";"rus"
"aeroioniz-";"aeroioniz.";"eng"
"aerojet";"aeroj.";"eng"
"aèrojoniz-";"aèrojoniz.";"rus"
"aèrolog-";"aerol.";"rus, mul"
share/title_abbr_iso4.csv view on Meta::CPAN
"archer";"n.a.";"eng"
"archery";"n.a.";"eng"
"archeÌtype";"n.a.";"fre"
"archi-";"arch.";"spa"
"archidiecezja";"archidiec.";"pol"
"archiefgid";"n.a.";"dut"
"Archiepiskop-";"Archiepisk.";"gre"
"archīg-";"archīg.";"gre"
"archipel";"n.a.";"fre"
"archipelago";"archipel.";"eng"
"architect-";"archit.";"eng, fre"
share/title_abbr_iso4.csv view on Meta::CPAN
"Berner";"Bern.";"ger"
"bērniem";"bērn.";"lav"
"Bernkastel";"Bernkast.";"ger"
"Bernström";"n.a.";"swe"
"beroep";"n.a.";"dut"
"beroepengids";"n.a.";"dut"
"beroepsbegeleidend";"beroepsbegel.";"dut"
"beroepsbevolking";"beroepsbevolk.";"dut"
"beroepsgegewen";"beroepsgegew.";"afr"
"beroepskeuze";"n.a.";"dut"
"beroepsmatige";"beroepsmat.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"biogeochemi-";"biogeochem.";"eng, ger"
"biogeÌochimi-";"biogeÌochim.";"rum, fre, ita"
"biogeograf-";"biogeogr.";"rus"
"biogeograph-";"biogeogr.";"mul"
"biogeohim-";"biogeohim.";"rus"
"biogidrohim-";"biogidrohim.";"rus"
"biograd-";"biograd.";"hrv"
"biograf-";"biogr.";"rus"
"biograph-";"biogr.";"mul"
"biohim-";"biohim.";"rus"
"biohydrometallurg-";"biohydrometall.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"boekbehoud";"n.a.";"dut"
"boekekrante";"boekekr.";"dut"
"Boekel";"n.a.";"dut"
"boekenclub";"n.a.";"dut"
"boekendienst";"boekend.";"dut"
"boekengids";"n.a.";"dut"
"boekenkrant";"n.a.";"dut"
"boekennieuw";"n.a.";"dut"
"boekhandel";"boekhand.";"dut"
"boekhoudkund-";"boekhoudkd.";"dut"
"boekhuis";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"boomerang";"n.a.";"eng"
"boomkwekerij";"boomkwek.";"dut"
"boomteelt";"n.a.";"dut"
"boomteeltproeftuin";"n.a.";"dut"
"boost-";"boost.";"eng"
"bootgids";"n.a.";"dut"
"bootrofia";"bootrof.";"gre"
"Bootsmarkt";"n.a.";"ger"
"Bootswirtschaft";"Bootswirtsch.";"ger"
"Boppard";"Bopp.";"ger"
"boraÌszat";"boraÌsz.";"hun"
share/title_abbr_iso4.csv view on Meta::CPAN
"circumpolar";"n.a.";"eng"
"circumstance";"circumst.";"eng"
"circunscripcioÌn";"circunscr.";"spa"
"circunstancia";"circunst.";"spa"
"Circus";"n.a.";"ger"
"circusgids";"n.a.";"dut"
"cÌŒirilica";"cÌŒir.";"srp"
"cÌŒirilicÌŒno";"cÌŒir.";"srp"
"cÌŒirilometodski";"cÌŒirilomet.";"srp"
"cirkel";"cirk.";"dan"
"ciÌrkevn-";"ciÌrkev.";"cze"
share/title_abbr_iso4.csv view on Meta::CPAN
"energiagazdaÌlkodaÌs";"energgazdaÌlk.";"hun"
"energiagazdasaÌg";"energgazd.";"hun"
"energiahateÌkonysaÌg";"energhateÌk.";"hun"
"energiaipar";"energip.";"hun"
"energiatakareÌkos";"energtakareÌk.";"hun"
"energidebatt";"n.a.";"swe"
"energidepartement";"energidep.";"nor"
"energie";"eÌnerg.";"dut, ger, fre"
"energiekonom-";"energiekon.";"fin"
"energifinansiering";"energifinans.";"swe"
"energiforskningsgruppe";"energiforskningsgr.";"nor"
"energifraÌŠgor";"n.a.";"swe"
share/title_abbr_iso4.csv view on Meta::CPAN
"Filmforschung";"Filmforsch.";"ger"
"filmforum";"n.a.";"mul"
"filmgazdasaÌg";"filmgazd.";"hun"
"Filmgeschichte";"Filmgesch.";"ger"
"Filmgespräch";"Filmgespr.";"ger"
"filmgids";"n.a.";"dut"
"Filmharmonisch";"Filmharmon.";"ger"
"Filmheft";"Filmh.";"ger"
"filmhiÌradoÌ";"filmh.";"hun"
"filminstitut-";"filminst.";"swe"
"Filmjahrbuch";"Filmjahrb.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"folkeregister";"folkeregist.";"nor"
"Folkestone";"n.a.";"eng"
"folketælling";"folketæll.";"dan"
"folketal-";"folketal.";"nor"
"folketing";"folket.";"dan"
"folkgids";"n.a.";"dut"
"folkhälsorapport";"folkhälsorapp.";"swe"
"folkhögskola";"folkhögsk.";"swe"
"folkhushaÌŠllning";"folkhushaÌŠlln.";"swe"
"folkkultur";"folkkult.";"fin"
"folklife";"n.a.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"gelanggang";"gelangg.";"may"
"geÌlatine";"n.a.";"fre"
"Geldanlage";"Geldanl.";"ger"
"Gelderland";"n.a.";"dut"
"Gelders";"Geld.";"dut"
"geldgids";"n.a.";"dut"
"Geldinstitut";"Geldinst.";"ger"
"Geldlehre";"n.a.";"ger"
"Geldschein";"n.a.";"ger"
"Geldzeich-";"Geldzeich.";"ger"
"Geleen";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"giboy-";"giboy.";"fre"
"Gibraltar";"n.a.";"eng"
"gibridizac-";"gibrid.";"rus"
"gibridn-";"gibrid.";"rus"
"gicle-";"gicl.";"fre"
"gideonit-";"n.a.";"swe"
"gidratac-";"gidrat.";"rus"
"gidravli-";"gidravl.";"rus"
"gidroaèromehani-";"gidroaèromeh.";"rus"
"gidrobiolog-";"gidrobiol.";"rus"
"gidrodinam-";"gidrodin.";"rus"
"gidroèlektrometallurg-";"gidroèlektrometall.";"rus"
"gidroènerget-";"gidroènerg.";"rus"
"gidrofizi-";"gidrofiz.";"rus"
"gidrogenerat-";"gidrogener.";"rus"
"gidrogeodez-";"gidrogeod.";"rus"
"gidrogeohim-";"gidrogeohim.";"rus"
"gidrogeolog-";"gidrogeol.";"rus"
"gidrogeotermicÌŒesk-";"gidrogeoterm.";"rus"
"gidrohim-";"gidrohim.";"rus"
"gidroizolâc-";"gidroizol.";"rus"
"gidroksid-";"gidroks.";"rus"
"gidroliz-";"gidroliz.";"rus"
"gidrolog-";"gidrol.";"rus"
"gidromagnitn-";"gidromagn.";"rus"
"gidromehani-";"gidromeh.";"rus"
"gidromeliora-";"gidromelior.";"rus"
"gidrometallurg-";"gidrometall.";"rus"
"gidrometeorolog-";"gidrometeorol.";"rus"
"gidromineralʹn-";"gidrominer.";"rus"
"gidroprivod";"n.a.";"rus"
"gidrotehni-";"gidroteh.";"rus"
"gidrotermal-";"gidroterm.";"rus"
"gidsenbond";"n.a.";"dut"
"gidsenkroniek";"gidsenkron.";"dut"
"giełd-";"giełd.";"pol"
"Giengen";"n.a.";"ger"
"Gieseking";"n.a.";"ger"
"giessen";"giess.";"ger"
"Giessener";"Giess.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"huisartsgeneeskunde";"huisartsgeneeskd.";"dut"
"huisdier";"n.a.";"dut"
"huiselijkh-";"huiselijkh.";"dut"
"huishoudelijk";"huishoud.";"dut"
"huishouden";"huishoud.";"dut"
"huishoudgids";"n.a.";"dut"
"huishouding";"huishoud.";"dut"
"huishoudkund-";"huishoudkd.";"afr"
"huishoudonderwijs";"huishoudonderw.";"dut"
"huishoudwetenshap-";"huishoudwet.";"dut"
"huisorgaan";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"inkomsten";"n.a.";"dut"
"inkomstenbelastingen";"inkomstenbelast.";"dut"
"inkontinent";"inkont.";"ger"
"Inkontinenz";"Inkont.";"ger"
"inkoop";"n.a.";"dut"
"inkoopgids";"n.a.";"dut"
"inköpare";"inköp.";"swe"
"Inkunabel";"Inkun.";"ger"
"inlägg";"n.a.";"swe"
"Inland";"n.a.";"eng"
"inlander";"inland.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"jaarbeeld";"n.a.";"dut"
"jaarbericht";"jaarber.";"dut"
"jaarboek-";"jaarb.";"dut"
"jaarbundel";"jaarbund.";"dut"
"jaarcijfer";"jaarcijf.";"dut"
"jaargids";"n.a.";"dut"
"jaarkalender";"jaarkal.";"dut"
"jaarkrant";"n.a.";"dut"
"jaarlijk-";"jaarl.";"dut"
"jaarlik-";"jaarl.";"afr"
"jaaroverzicht";"jaaroverz.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"konsultvärld-";"n.a.";"swe"
"Konsum";"n.a.";"ger"
"konsumen-";"konsum.";"pol"
"konsument";"n.a.";"mul"
"Konsumentenerziehung";"Konsumentenerzieh.";"ger"
"konsumentengids";"n.a.";"dut"
"konsumentenrecht";"konsumentenr.";"dut"
"konsumentfraÌŠgor";"n.a.";"nor"
"konsumentinstitut";"konsumentinst.";"swe"
"konsumentnytt";"n.a.";"nor"
"konsumentombudsmann-";"konsumentombudsm.";"fin"
share/title_abbr_iso4.csv view on Meta::CPAN
"kőolajipar";"kőolajip.";"hun"
"koondkataloog";"koondkat.";"est"
"kooperac-";"koop.";"rus"
"kooperasi";"koop.";"may"
"kooperati-";"koop.";"ger, rus"
"koopgids";"n.a.";"dut"
"koophandel";"koophand.";"dut"
"koopprijs";"n.a.";"dut"
"koopvaardijvloot";"n.a.";"dut"
"koordina-";"koord.";"ger, rus"
"koordinaÌcioÌ";"koord.";"hun"
share/title_abbr_iso4.csv view on Meta::CPAN
"Kunstgeschichte";"Kunstgesch.";"ger"
"Kunstgeschichtlich-";"Kunstgesch.";"ger"
"kunstgeschiedenis";"kunstgeschied.";"dut"
"Kunstgesellschaft";"Kunstges.";"ger"
"Kunstgewerbe";"Kunstgew.";"ger"
"kunstgids";"n.a.";"dut"
"Kunsthalle";"n.a.";"ger"
"kunsthåndværk-";"kunsthåndv.";"dan"
"kunsthaÌŠndverksskole";"kunsthaÌŠndverkssk.";"nor"
"Kunsthandwerk";"Kunsthandw.";"ger"
"kunstharsen";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"levensloop";"n.a.";"dut"
"levensmiddelen";"n.a.";"dut"
"levensvekeer";"n.a.";"dut"
"levensverzekering";"levensverzek.";"dut"
"leverag-";"n.a.";"eng"
"leveranciersgids";"n.a.";"dut"
"leverandør";"n.a.";"nor"
"leverandøravis";"n.a.";"nor"
"leverantör";"n.a.";"swe"
"levering";"lever.";"dan"
"Leverkusen";"Leverk.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"maandbericht-";"maandber.";"dut"
"maandblad";"maandbl.";"dut"
"maandbrief";"maandbr.";"dut"
"maandcijfers";"n.a.";"dut"
"maandelijks";"maand.";"dut"
"maandgids";"n.a.";"dut"
"maandnotitie";"maandnot.";"dut"
"maandorgan";"maandorg.";"dut"
"maandoverzicht";"maandoverz.";"dut"
"maandschrift-";"maandschr.";"dut"
"maandstatistiek";"maandstat.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"magnific-";"magnif.";"lat"
"magnify-";"magnify.";"eng"
"magnitn-";"magn.";"rus"
"magnitnotverd-";"magnitnotverd.";"rus"
"magnitodielektri-";"magnitodielektr.";"rus"
"magnitogidrodinam-";"magnitogidrodin.";"rus"
"magnitogorsk-";"magnitogorsk.";"rus"
"magnitosfer-";"magnitos.";"rus"
"magnitude";"magnit.";"fre"
"magnolia";"n.a.";"mul"
"magyar";"magy.";"hun"
share/title_abbr_iso4.csv view on Meta::CPAN
"paleoecolog-";"paleoecol.";"spa"
"paleoenvironment-";"paleoenviron.";"eng"
"paleoethnolog-";"paleÌoeÌthnol.";"eng, fre"
"paleogene";"n.a.";"eng"
"paleogeograf-";"paleogeogr.";"ger, eng"
"paleogidrogeolog-";"paleogidrogeol.";"rus"
"paleogidrolog-";"paleogidrol.";"rus"
"paleolimnolog-";"paleolimnol.";"eng"
"paleolit-";"paleolit.";"slv"
"paleomagneti-";"paleomagn.";"rus"
"paleontograph-";"paleÌontogr.";"mul, fre"
"paleontolog-";"paleÌontol.";"mul, spa, ita, fre"
share/title_abbr_iso4.csv view on Meta::CPAN
"proteção";"prot.";"por"
"protecção";"prot.";"por"
"proteccion-";"prot.";"spa"
"protect-";"prot.";"eng, fre"
"proteÌger";"prot.";"fre"
"protegido";"prot.";"spa"
"protein";"n.a.";"rus, ger, eng"
"proteksi";"prot.";"ind"
"Protekt-";"Prot.";"ger"
"proteomics";"proteom.";"eng"
"proÌtese";"n.a.";"por"
share/title_abbr_iso4.csv view on Meta::CPAN
"reiseorganisatie";"reiseorgan.";"dut"
"Reisestelle";"n.a.";"ger"
"Reiseveranstaltung";"Reiseveranst.";"ger"
"Reiseverkehr";"Reiseverk.";"ger"
"Reisevermittlung";"Reisevermittl.";"ger"
"reisgids-";"n.a.";"dut"
"reiskrant";"n.a.";"dut"
"reisverslag";"reisversl.";"dut"
"reisweg";"n.a.";"dut"
"reiten";"reit.";"ger"
"Reiter";"Reit.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"szupermarket";"szupermark.";"hun"
"szynow-";"szyn.";"pol"
"taalbeheersing";"taalbeheers.";"dut"
"taalbrief";"n.a.";"dut"
"taalgebied";"taalgeb.";"dut"
"taalgids";"n.a.";"dut"
"taalkundig";"taalkd.";"dut"
"taalonderrig";"taalonderr.";"afr"
"taalvaardigheid";"taalvaardigh.";"dut"
"taalwetenschap";"taalwet.";"dut"
"taalzaak";"n.a.";"dut"
share/title_abbr_iso4.csv view on Meta::CPAN
"telefax";"n.a.";"mul"
"telefeks";"n.a.";"may"
"telefon-";"telef.";"mul"
"telefongyaÌr";"telefgy.";"hun"
"telefonpanoráma";"telefpanor.";"hun"
"telefoongids";"n.a.";"dut"
"Telefunken";"n.a.";"ger"
"telegraaf-";"telegr.";"dut"
"tēlegraf-";"telegr.";"gre, rus"
"telegrafstyre";"n.a.";"nor"
"telegram";"telegr.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"vacant̡a";"n.a.";"rum"
"vacanza";"n.a.";"ita"
"vacare";"n.a.";"ita"
"vacation-";"vacat.";"fre, eng"
"vacationland";"n.a.";"eng"
"vacaturegids";"n.a.";"dut"
"vacaturelijst";"vacaturel.";"dut"
"vacaturesupplement";"vacaturesuppl.";"dut"
"vaccin";"n.a.";"rum, fre"
"vaccination";"vaccin.";"mul"
"vaccinògeno";"vaccinòg.";"ita"
share/title_abbr_iso4.csv view on Meta::CPAN
"VajdasaÌg";"Vajd.";"hun"
"vakaÌcioÌ";"vakaÌc.";"hun"
"vakantie";"n.a.";"dut"
"vakantiebesteding";"vakantiebested.";"dut"
"vakantieboek";"vakantieb.";"dut"
"vakantiegids";"n.a.";"dut"
"vakantiekampen";"n.a.";"dut"
"vakantieland";"vakantiel.";"dut"
"vakantieseizoen";"n.a.";"dut"
"vakantieverblijv-";"vakantieverbl.";"dut"
"Vakanz";"n.a.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"Vormärz";"n.a.";"ger"
"vormen";"n.a.";"dut"
"vormgeving";"n.a.";"dut"
"vorming";"n.a.";"dut"
"vormingscentrum";"vormingscent.";"dut"
"vormingsgids";"n.a.";"dut"
"vormingswerk";"vormingsw.";"dut"
"Vormundschaft";"Vormundsch.";"ger"
"vornehmlich";"vornehml.";"ger"
"vornemlich";"vorneml.";"ger"
"voronegien-";"voroneg.";"fre"
share/title_abbr_iso4.csv view on Meta::CPAN
"wie̢zien-";"wie̢zien.";"pol"
"Wiggins";"n.a.";"eng"
"Wijchen";"n.a.";"dut"
"wijngaard";"wijng.";"dut"
"wijninvoer";"wijninv.";"dut"
"wijnkoopgids";"n.a.";"dut"
"wijnstok";"n.a.";"dut"
"wijsbegeerte";"wijsb.";"dut"
"wijsgerig";"wijsg.";"dut"
"wijzer";"n.a.";"dut"
"wilan-";"wilan.";"pol"
share/title_abbr_iso4.csv view on Meta::CPAN
"zeebiologi-";"zeebiol.";"dut"
"Zeebrugge";"n.a.";"dut"
"zeehaven-";"zeehav.";"dut"
"zeehond";"n.a.";"dut"
"zeekaart";"n.a.";"dut"
"zeemansgids";"n.a.";"dut"
"zeemeermin";"n.a.";"dut"
"zeemleder";"zeemled.";"dut"
"Zeeonderzoek";"Zeeonderz.";"dut"
"zeerecht";"zeer.";"dut"
"zeescheepvaart";"zeescheepv.";"dut"
App-PM-Announce
view release on metacpan or search on metacpan
lib/App/PM/Announce.pm view on Meta::CPAN
# password
# uri http://www.meetup.com/An-Example-Group/calendar/?action=new
# venue <venue>
#</feed>
# Replace <gid> with the gid of your group
#<feed linkedin>
# username
# password
# uri http://www.linkedin.com/groupAnswers?start=&gid=<gid>
#</feed>
# Replace 'example.com' with a real host
#<feed greymatter>
App-PhotoDB
view release on metacpan or search on metacpan
lib/App/PhotoDB/funcs.pm view on Meta::CPAN
use Term::ReadLine::Perl;
use File::Basename;
use Time::Piece;
use Text::TabularDisplay;
our @EXPORT_OK = qw(prompt db updaterecord deleterecord newrecord notimplemented nocommand nosubcommand listchoices lookupval lookuplist today validate ini printlist round pad lookupcol thin resolvenegid chooseneg annotatefilm keyword parselensmodel ...
=head2 prompt
Prompt the user for an arbitrary value. Has various options for data validation and customisation of the prompt.
If the provided input fails validation, or if a blank string is given when required=1 then the prompt is repeated.
lib/App/PhotoDB/funcs.pm view on Meta::CPAN
# If the input is longer than the target, truncate it
return substr($string, 0, $totallength);
}
}
=head2 resolvenegid
Get a negative ID either from the neg ID or the film/frame ID
=head4 Usage
my $negID = &resolvenegid({db=>$db, string=>'10/4'});
=head4 Arguments
=item * C<$db> DB handle
lib/App/PhotoDB/funcs.pm view on Meta::CPAN
Integer negative ID
=cut
sub resolvenegid {
my $href = shift;
my $db = $href->{db};
my $string = $href->{string};
if ($string =~ m/^\d+$/) {
# All digits - already a NegID
( run in 1.841 second using v1.01-cache-2.11-cpan-acf6aa7dc9e )