Mes artėjame prie Kūčių ir Kalėdų ir čia pateikiame jums šią paprastą „Perl“ programą, kuria galite papuošti savo terminalą kalėdine dvasia.
Su šia programa jūsų „Linux“ konsolė gali atrodyti kaip eglutė animacinis ir nepaisant to, kad jo naudingumas neperžengia estetinės konsolės dalies ribų, tai yra gana įdomu ir mes galime naudoti šias gruodžio dienas, o jei jūs skaitote ir norite išbandyti, tęskite kad aš paaiškinu, kaip ką daryti.
Taigi norint medį vizualizuoti konsolėje būtina turėti įdiegė „Perl sistemoje (su kuria įvyks magija), jei mes ją jau turime, galite ją įdiegti Acme :: POE :: Medis. Šiam diegimui mes turime naudoti CPAN (Comprehensive Perl Archive Network) modulį po paleidimo su teisėmis, parašysime paprastą komandinę eilutę:
perl -MCPAN -e 'install Acme::POE::Tree'
Jau tai padarę, apvalkale pamatysime animacinę eglutę su labai paprasta komanda:
perl -MAcme::POE::Tree -e 'Acme::POE::Tree->new()->run()'
Taip pat galima pritaikyti šį medį, jei norite, tiesiog turite redaguoti „Perl“ scenarijaus šaltinio kodą ir išsaugote jį teksto faile (pvz., christmas.pl) su tokiu turiniu:
#! / usr / bin / perl
naudoti Acme :: POE :: medį;
mano $ medis = Acme :: POE :: Medis-> naujas (
{
žvaigždės atidėjimas => 1.5, # ryškumas 1.5 sekundės
light_delay => 2, # žiburiai mirksi 2 sekundes
run_for => 10, #Exit automatiškai po 10 sekundžių mėginio
}
);
$ medis-> paleisti ();
Naudodamiesi šia paprasta programa, jūsų pultas bus apsirengęs kalėdine dvasia ir kaip visada laukiame jūsų komentarų ir įspūdžių.
LINKSMŲ KALĖDŲ!!
Jūs puikus RoBertucho.
«Kai tai padarysime, apvalkale pamatysime animuotą eglutę su labai paprasta komanda:
perl -MAcme :: POE :: Medis -e 'Acme :: POE :: Medis-> naujas () -> paleisti ()' »
Aišku, kas pamirštų tokią paprastą komandą, kad ji įsimenama tiesiog matant ją 1 sek
Draugas @sli, tai tikrai paprasta, nutinka taip, kad gali neturėti supratimo apie programavimą. Leiskite jums išsamiai paaiškinti, kas vyksta užkulisiuose.
Kai nesame, terminale rašome: »perl -MAcme :: POE :: Tree -e 'Acme :: POE :: Tree-> new () -> run ()'«. Kompiuteriui nurodome, kad „Perl“ programavimo kalba vykdo programą, kuri perduodama kaip argumentas „Perl“ vertėjui 🙂
Man nelabai patinka „Perl“, aš labiau mėgstu „Python“, kaip mano pingvinų scenarijaus kalbą.
Sveikinimai.
Taip geriau
https://gist.github.com/franktoffel/aea4329b760eb3e72f4d
Aš nepasitikiu, jei jame rašoma acme