Svetainės pokyčiai

Šiandieną kaip ir žadėjau sutvarkiau tą įžymųjį riktą, kai buvo
įmanoma rašyti komentarus neegzistuojančioms temoms. Tiesa, padariau
taip, kad kiekvienas komentaras, kuris neturi savo temos automatiškai
einą į 666 dienoraščio įrašą – kiekviena kompiuterastinė svetainė
turi savo keistų įdomybių, tad palieku šitą taip kaip yra (nesinori
vienok trint visos tos 666-osios temos ;)

Padariau dar vieną kosmetinį pataisymą – dabar veikia XHTML 1.0
standartas komentarų formoje (Trūko kai kurių uždarančiųjų žymių). Taip
pat dabar veikia ir <code> žymė komentaruose
(bbkodas). Galbūt kada nors bus įmanoma ir su sintaksės žymėjimu
sužaist, bet norėtųsi palaikyt daugiau nei vieną programavimo kalbą ;)

Grįžau

Na štai, po kelių dienų bastymosi po Lietuvą, vėl sėdžiu Vilniuje prie savo
kompiuterio. Kaip sakant „visur gerai, bet localhoste geriausia“.

Na, visų ten įvykių kur ėjau, ką mačiau ir kur buvau nepasakosiu, nes tai
niekam neįdomu. Jei trumpai, tai niekas nepasikeitė – nei susiradau
merginą, nei ruošiuosi palikti kompiuterius ir išsikraustyti pas aborigenus.
Tiesa, šiek tiek išskirtinė buvo paskutinė naktis Palangoje, galbūt verta
šiokio tokio jūsų kompiuterastinio dėmesio.

Grįžau į Palangą tik kokią 21 valandą (prieš tai buvau Nidoje, bet kelionės
metu nieko kompiuterastiško neįvyko). Buvau ten kažką preliminariai sutaręs su
corn_kid jog eisim alaus apie vidurnaktį kur nors Kupetoj ar Bare.
Jaučiausi žvėriškai išalkęs tad iš karto patraukiau į Kupetą, užsisakiau
kažikokį vištienos kepsnį ir tikėdamasis geros kompiuterastinių pokalbių su
alaus bokalais nakties pradėjau jį naikinti. Va čia prasidėjo visos bėdos.
corn_kid parašė kad jam šalta ir lyja, todėl kompiuterastinio išgėrimo
nebus, nes jis liks su mergina. Huh? Atsisakyti alaus ir pasvarstymų temomis
„Perl yra gerai, užtad PHP tik kartais“ ir „mano serveris
gali apdėti tavo serverį net ir be SCSI diskų“ dėl merginos? kažkas čia
man nepažįstamo. Na tiek to. Baigiasi kepsnys, baigiasi muzika, prasideda
tiesioginė Baro transliacija. Apsimesdamas paprastu PHP programuotoju įeinu į
Barą. Nyku gi ten. Visi ploja pagal režisieriaus nurodymus, o aš tų barmenų
nepažįstu ir šiaip abejoju ar jiems galima įrodyt jog Perlas yra gera
programavimo kalba, tad greit iš ten pasišalinu. Lauke lyja, bet aš su
lietsargiu (kas labai pravers už kokių trejų valandų), tad pėdinu per balas
Basanavičiaus gatvės link. Net jei neisiu kur nors į kokį klubą, vis tiek
žinau kad Basanavičiaus gatvėje yra interneto kavinė su lipniomis
klaviatūromis, kuriose neveikia CTRL mygtukai. O interneto kavinė yra gerai,
nes galima pasitikrinti ar neatsirado ko nors naujo ir intriguojančio
perlmonksuose ar dar kur nors.

Bet patekau ne į interneto kavinę. Užėjau į Laukinių Vakarų Salūną (LVS).
Po Kupetoje buvusios puikios bliuzo ir rokenrolo programos čia muzika buvo
visiškai skirta eiliniam klubiniam Lietuvos piliečiui iš kokių nors Gargždų
(aš nieko prieš Gargždus neturiu, čia tik atsitiktnis kaimo.. mmmm…
miestelio pavadinimas). Sėdėjau ramiai ir stebėjau kas vyksta. Kas vyko ant
scenos ar šokių aikštelėje iš pradžių nebuvo įdomu, tad stebėjau publiką. Ok,
iki šiol galvojau, kad Brodvėjus yra blogai. Brodvėjus yra labai gerai. LVS
publiką sudarė visokios ten
„aš-iš-Kelmės-ir-švenčiu-savo-16-ąjį-gimtadienį“ bei
„aš-iš-Eišiškių-man-17-ryt-išteku-antrą-kartą“. Prasta dirva
Perlinėms idėjoms sėti. Dar šiek tiek pasėdėjau, pasimaliau šokių aikštelėje
(nepadėjo ten nei mirkčiojimas nei šypsenos), užsisakiau alaus. Tuo metu
prasidėjo pagrindinė LVS programa, kurioje koncertavo kažikokie transvestitai
iš Baltarusijos (Ar ponas Lukašenka negalėtų pasiimti savo transvestitų ir
laikyti juos kur nors giliai Saugumo rūsiuose Minske? Ačiū.) Na, kai vietoj
mano Švyturio alaus atnešė Utenos, man trūko kantrybė ir išėjau link namų.

Ėjau sau ramiai Basanavičiaus gatve, paskui Vytauto prospektu, mąsčiau kad
reikės poryt į darbą, galvoje man grojo visą šią dieną klausyta Metallica…
Jau visai prie pat namų tokioj tamsioj vietoj girdžiu kažkas atbėga iš
nugaros. Atsisuku, gaunu smūgį į dantis. Ten kaip sako žmonėm prieš mirtį
gyvenimas pro akis pralekia, tai man taip pragrojo ta scena iš filmo
„Fight Club“ kur vyksta šis dialogas:

Tyler: Never been in a fight, you?

Narrator: No, but that’s a good thing.

Tyler: No, it is not. How much can you know about yourself if you’ve never
been in a fight?

Na ką gi, mano rankose puikus ginklas – skėtis su kampuota rankena,
esu įkvėptas Fight Club ir dar neblaivus, tad nieko nelaukęs trenkiu su skėčiu
užpuolikui per veidą ir per daug nieko nemąstęs dedu į kojas. Tų užpuolikų
nevienas, o trys, bet jie ten persigrupuoja ar ką ten daro (na, gal jiems
tiesiog lagina), nes pastebi jog aš bėgu tik tada kai jau aš būnu nubėgęs
kokią dešimt metrų. Tiesa, kai bėgi ir tavyje tūno keletas bokalų alaus tai ne
taip greit bėgasi kaip norėtųsi, tad mane paveja. Tiesa, esu jau prie pat
Vytauto gatvės, ten šviesu. Paviję mane nustumia, patogiai atsisėdu ant
asfalto ir prasideda derybos. Pirmiausia esu apkaltinamas kad žaidžiu ne pagal
taisykles (Ble, kur bėgi?), į tai aš atsakau šiek tiek riebiau
([3.14]zdinkit nx – vienas dalykas, kurį mane išmokė IRC
programuotojų kanalai, tai efektingai keiktis. Ačiū jums, kolegos). Paskui
pateikiami reikalavimai (Atiduok visus daiktus – švari kalba lyg
iš Jablonskio veikalų be jokių rusicizmų keiksmažodžių pavidale). Permąstau ką
aš čia gero turiu kišenėse. Piniginėje kokia 30 litų – negaila, jei man
kortelę paliktų ir dokumentus. Dar turiu mobilką ir Flash USB raktą pilną
visokios naudingos kompiuterastinės informacijos. Ne tiek būtų būtų gaila
mobilkos kiek būtų gaila ten suvestų telefonų (hmm… reikia backupus
pasidaryt). Vytauto prospektas už kokių 5 žingsnių tad nutariu kovoti už savo
turmą informaciją ir neatiduoti jos niekam. Atsikeliu ir bėgu, niekas manęs
nesulaiko, nes jiems čia per daug arti žmonių akių. Sunkus gi tų plėšikų
darbas, čia ne prie kompo naktimis sėdėt PHP keiksnojant.

Na nueinu į artimiausią restoraną, apsiprausiu, iškviečiamas taksi, esu
namie, naktis baigėsi. Gulėdamas jau lovoj mąstau jog Lietuva tikrai blogoj
padėtyje, nes net plėšikai kažkokie lameriai, nesugebėję trise susitvarkyt su
moxliuku vidury tamsios nakties. Iš vis ar dar yra pas mus gerai savo darbą
atliekančių žmonių?

Na ryte pagalvojau kad kaip pilietis, turiu pranešti apie šį įvykį
policijai, nes gal kitą naktį bus užpultas ne moxliukas su skėčiu
prisižiūrėjęs Fight Club, o kokia nusigėrusi šešiolikmetė iš Kelmės, šventusi
savo gimtadienį (lyg būtų gaila). Na, nuėjau, papasakojau, nesugebėčiau aš jų
atpažint, nesiruošiu ten rašyt pareiškimų ar dar bile ko. Padėkojo man dėdės
policininkai ir sakė atkreips didesnį dėmesį į tą tamsų ir klastingą
problematišką rajoną. Tai vat. Lūpa truputį prakirsta, bet jaučiuosi dabar
užtad pailsėjęs ir pasiryžęs kibti į naujus darbus.

Perl.lt susirašinėjimo sąrašas

Vakar prisiruošiau paskambinti tėčiui į Kauną ir paprašyt kad
perkrautų mano serveriuką, nes jis jau kokią savaitę dingęs iš
Interneto. Na viskas gerai, viskas pasikėlė, viskas veikia. Tad galvoju
pats laikas pakurti mailing listą (susirašinėjimo sąrašą ;) ir CVS.
Pradėjau nuo elektroninio pašto. Kiek suprantu tai dažniausiai tokiems
dalykams naudojamas GNU Mailman, rašytas Pythonu. Per
apt-get susidėt sunkoka, nes man jis bando įgrūst dar ir
senesnę Apache, tad ėmiausi standartinių priemonių grūsti viską iš
pradinių kodų, juolab kad serveriukas ten eksperimentinis. Viskas lyg
pasikūrė, viskas tvarkoj. Kol nepabandžiau nueiti per http ten kur turi
būt archyvuojami laiškai. Serveriukas dirbo suprakaitavęs.
top rodo apkrovas apie 16-18. Po penkių minučių vis tiek
nesulaukiau jokios žinios iš serverio. Aišku Pitonas čia eina per CGI,
aišku RAMo tėra tik 16MB (aš optimistas gi), bet juk Perlinės
programėlės be problemų veikia, ir SWAPe tik keli megabaitai guli :/

Žodžiu su Mailman nieko nebus. Na, idėjiškai tai ir negerai būtų
naudoti Pitono kodą Perliniams reikalams ;) O jei rimčiau tai reikės
pasiieškoti ko nors paprastesnio, arba tiesiog rankutėmis koreguoti
/etc/aliases kai reikės ką nors pridėti prie sąrašo, bei
pasirašyti trumpą Perlinę programėlę pašto archyvavymui. Juk čia nėra
didelė ir daug atminties ryjanti užduotis. Bent jau taip galvojau kol
Mailmano neturėjau ;)

Apache įdomybės

Kažkaip paskutiniu metu Apache pradėjo keistai elgtis. Na, gal ne
paskutiniu metu, bet vis tiek keistai. Nightblade man pasakė, jog
jam staiga pradėjo rodyti mano weblogo sourcą. Pagal visus Apache logus
tai tik vieną kartą jam buvo persiųsta tiek baitų kiek yra source, o
daugiau matyt tik kešuojama kažkur pas jį proksiuose ar dar kur nors.
Kas keisčiausia, tai error.log yra visiškai tuščias ir
švarus. Hmm… Tiesiog vieną kartą netyčia nesuveikė mod_perl, nes buvo
per didelė apkrova? Nors tuo metu neturėjo būti serveris apkrautas. O ir
atrodo daugiau tokių dalykų nesimato loguose. Keista.

Besižiūrinėdamas logus prisiminiau dar vieną su serveriu susijusią
keistenybę. Čia vidiniam naudojimui yra naudojamas webmailas –
būtent Squirrelmail (taip, taip, buvo jame XSS riktų, čia lyg užlopiau).
Keisčiausia, jog negalima pakeisti jokių nuostatų iš vartotojo pusės
(nusistatyt kalbą, temą ir panašiai). Atrodo lyg veikė seniau gerai :/
Visos permisijos ant duomenų direktorijų nustatytos tikrai gerai (netgi
per daug atvirai nei reikia, bet vis tiek neveikia). Pasirodo, Apache
error.log bandant ką nors padaryt Squirrelmaile atsiranda
įrašas apie mirusį vaiką dėl segmentavimo klaidų (heh, keistokai
lietuviškai skamba tas „Segmentation fault: child died“)
Pasigooglinau. Pasirodo šiuo atveju kreivas PHP. Persikompiliavau pats
PHP (o ne iš Debiano paketų sudėjau), viskas veikia. Tik su Nightblade
vis dar keistenybės. Gal reiktų ir Apache savo susikompiliuot :/

perlreref pradinis vertimas

Štai pirmasis juodraštinis variantas. Labai sunku versti, nes daug sunkiai išverčiamų terminų ;) Na bet gal kam nors bus naudinga.

PAVADINIMAS

perlreref – Perlo įpraiškų žinynas

APRAŠYMAS

Tai trumpas Perlo įpraiškų žinynas. Pilnos informacijos apie
įpraiškas ieškokite perlre ir perlop dokumentacijos skyriuose,
o taip pat šio žinyno TOLIMESNĖ INFORMACIJA skyriuje.

OPERATORIAI

  =~ nustato kuriam kintamajam taikyti šabloną.
     Jei nenurodoma, naudoja $_                      
                                                        
        $var =~ /foo/;                             

  m/įpraiška/igmsoxc ieško simbolių eilutėje įpraiškos atitikimo,
     su šiais galimais nustatymais:

        i  Nekreipiant dėmesio į didžiąsias/mažąsias raides
        g  Globalus - visi atitikimai
        m  Per kelias eilutes - ^ ir $ atitinka vidines eilutes
        s  Taikyti kaip vienai eilutei - . atitinka \n
        o  Kompiliuoja įpraišką tik vieną kartą
        x  Išplėstinės įpraiškos - galima naudoti tarpus ir komentarus
        c  Neatitaisyti pos kai įpraiška neatitinka eilutės naudojant /g

     Jei 'įpraiška' yra tuščia eilutė, vietoje jos naudojama paskutinė 
     sėkmingai atitikusi įpraiška. Galima naudoti ir kitokius skirtukus 
     nei '/' tiek šitam operatoriui, tiek ir žemiau aprašytiesiems.

  qr/įpraiška/imsox leidžia išsaugoti įpraišką į kintamąjį ar perduoti į 
     funkciją. Modifikatoriai saugomi kartu su įpraiška, kaip ir m// atveju.

  s/įpraiška/pakeitimas/igmsoxe pakeičia simbolių eilutėje atitikusias 
     'įpraišką' dalis į 'pakeitimą'. Modifikatoriai tokie patys kaip ir
     m// atveju, tik su vienu papildymu:

        e  Įvykdyti 'pakeitimą' kaip Perlo kodą

     'e' gali būti nurodytas ir keletą kartų. 'pakeitimas' yra 
     interpretuojamas kaip simbolių eilutė tarp dvigubų kabučių, nebent šio 
     operatoriaus skirtukas yra vienguba kabutė (').

  ?įpraiška? lygiai taip pat kaip m/įpraiška/ tačiau atitinka tik vieną kartą.
     Negalima naudoti jokių kitų skirtukų. Turi būti atstatyta su 'reset'.

SINTAKSĖ

   \       Išvengia tuoj po jo einančio simbolio meta-reikšmės
   .       Atitinka bet kurį vieną simbolį išskyrus naujos eilutės simbolį
	       (nebent naudojamas /s modifikatorius)
   ^       Atitinka teksto pradžią (arba eilutės pradžią, jei naudojamas /m)
   $       Atitinka teksto pabaigą (arba eilutės pabaigą, jei naudojamas /m)
   *       Atitinka prieš tai einantį elementą 0 ar daugiau kartų
   +       Atitinka prieš tai einantį elementą 1 ar daugiau kartų
   ?       Atitinka prieš tai einantį elementą 0 ar 1 kartų
   {...}   Nurodo prieš tai einančio elemento pasikartojimų intervalą
   [...]   Atitinka kurį nors simbolį ir nurodytos aibės
   (...)   Sugrupuoja išraiškas ir priskiria jų rezultatus $1, $2...
   (?:...) Sugrupuoja išraiškas be rezultatų priskyrimo
   |       Atitinka išraišką iš dešinės ARBA iš kairės (alternatyva)
   \1, \2 ...  Tekstas iš N-tosios grupės

SPECIALIOSIOS SEKOS

Šios sekos veikia taip kaip ir paprastose simbolių eilutėse:

   \a       Skambutis
   \e       Escape
   \f       Formfeed
   \n       Newline - nauja eilutė
   \r       Carriage return
   \t       Tab
   \038     Bet kuri aštuonetainė ASCII reikšmė
   \x7f     Bet kuri šešioliktainė ASCII reikšmė
   \x{263a} Plati šešioliktainė reikšmė
   \cx      Control-x
   \N{name} Vardinis simbolis

   \l  Mažosios raidės iki kito simbolio
   \u  Didžiosios raidės iki kito simbolio
   \L  Mažosios raidės iki \E
   \U  Didžiosios raidės iki \E
   \Q  Išjungia metasimbolius iki \E
   \E  Didžiųjų/mažųjų raidžių transformavimo pabaiga

Ši seka veikia skirtingai nei simbolių eilutėse:

   \b  Žodžio riba, o ne "backspace", išskyrus simbolių aibėse

SIMBOLIŲ AIBĖS

   [amy]    Atitinka 'a', 'm' ar 'y'
   [f-j]    Brūkšnelis nurodo "intervalą"
   [f-j-]   Brūkšnelis pačioje pradžioje ar pabaigoje reiškia brūkšnelį
   [^f-j]   Stogelio ženklas reiškia "atitinka viską kas NĖRA aibėje"

Šios sekos veikia tiek aibėse, tiek ir už jų:

   \d      Skaitmuo, tas pats kaip [0-9]
   \D      Ne skaitmuo, tas pats [^0-9]
   \w      Raidės arba skaičiaus simbolis, tas pats kaip [a-zA-Z_0-9]
   \W      Ne raidė ir ne skaičius, [^a-zA-Z_0-9]
   \s      "Baltas" simbolis, tas pats kaip [ \t\n\r\f]
   \S      "Nebaltas" simbolis, [^ \t\n\r\f]
   \C      Atitinka baitą (Unikode '.' atitinka simbolį)
   \pP     Atitinka P-vardo (Unikodinę) savybę
   \p{...} Atitinka Unikodo savybę ilgu pavadinimu
   \PP     Atitinka ne-P savybę
   \P{...} Atitinka ne-P unikodinę savybę ilgu pavadinimu
   \X      Atitinka išplėstinę Unikodinę seką

POSIX simbolių aibės bei jų Unikodiniai bei Perlo atitikmenys

   alnum   IsAlnum             Raidės ir skaičiai
   alpha   IsAlpha             Raidės
   ascii   IsASCII             Bet koks ASCII simbolis
   blank   IsSpace  [ \t]      horizontalūs "balti" simboliai (GNU)
   cntrl   IsCntrl             Konrolės simboliai
   digit   IsDigit  \d         Skaitmenys
   graph   IsGraph             Raidės, skaičiai ir skyryba
   lower   IsLower             Mažosios raidės (pagal lokalę)
   print   IsPrint             Raidės, skaičiai, skyryba, tarpų simboliai
   punct   IsPunct             Skyryba
   space   IsSpace  [\s\ck]    "Balti" simboliai
           IsSpacePerl   \s    "Balti" simboliai pagal Perlo apibrėžimą
   upper   IsUpper             Didžiosios raidės (pagal lokalę)
   word    IsWord   \w         Raidės, skaičiai ir _ (Perlas)
   xdigit  IsXDigit [\dA-Fa-f] Šešioliktainis skaitmuo

Simbolių aibėse:

    POSIX       tradicinis    Unikodas
    [:digit:]       \d        \p{IsDigit}
    [:^digit:]      \D        \P{IsDigit}

INKARAI

Visos šios sekos tik nurodo kurioje vietoje reikia taikyti šabloną.

   ^  Atitinka teksto pradžią (arba eilutės, jei naudojamas /m)
   $  Atitinka teksto pabaigą (arba eilutės, jei naudojamas /m) arba prieš naują eilutę
   \b Atitinka žodžio ribą (tarp \w ir \W)
   \B Atitinka ne žodžio ribą
   \A Atitinka teksto pradžią (nekreipia dėmesio į /m)
   \Z Atitinka teksto pabaigą (prieš pabaigą einančią nebūtiną \n)
   \z Atitinka absoliučią teksto pabaigą
   \G Atitinka tą vietą, kurioje darbą baigė paskutinis m//g 
   \c Iš naujo nenustatinėja paieškos vietos kai naudojamas /g.
      Be \c, kiekvieną kartą pradedama ieškoti nuo pradžios

KIEKINĖS SEKOS

Kiekinės sekos automatiškai atitinka ilgiausią seką iš kairės.

   Maksimalu Minimalu Leidžiamas intervalas
   --------- -------- ---------------------
   {n,m}     {n,m}?  Turi būti ne mažiau kaip n kartų, bet ne daugiau nei m kartų
   {n,}      {n,}?   Turi būti bent n kartų
   {n}       {n}?    Turi būti lygiai n kartus
   *         *?      0 arba daugiau kartų (tas pats kaip {0,})
   +         +?      1 arba daugiau kartų (tas pats kaip {1,})
   ?         ??      0 arba 1 kartą (tas pats kaip {0,1})

IŠPLĖSTINĖS SEKOS

   (?#tekstas)        Komentaras
   (?imxs-imsx:...)   Įjungia/išjungia nustatymą (taip kaip ir m//)
   (?=...)            Nulinio ilgio teigiamas sprendinys už šios vietos
   (?!...)            Nulinio ilgio neigiamas sprendinys už šios vietos
   (?<...)            Nulinio ilgio teigiamas sprendinys prieš šią vietą
   (?<!...)           Nulinio ilgio neigiamas sprendinys prieš šią vietą
   (?>...)            Atitikti kiek galima daugiau nesaugant reikšmių kintamuosiuose
   (?{ kodas })       Įterptas kodas, grąžinta reikšmė tampa $^R
   (??{ kodas })      Dinaminė įpraiška, grąžinta reikšmė panaudojama kaip įpraiška
   (?(sąlyga)taip|ne) Sąlyga yra skaičius atitinkantis skliaustelius
   (?(sąlyga)taip)       

KINTAMIEJI

   $_    Kintamais pagal nutylėjimą, kurį naudoja operatoriai
   $*    Įjungia šablonų taikymą keletui eilučių (nenaudotinas; nebėra 5.8.1+ versijose)

   $&    Visa simbolių eilutė, kuri atitiko
   $`    Viskas iki atitikusio simbolių eilutės
   $'    Viskas po atitikusios simbolių eilutės

Šių trijų kintamųjų vartojimas sulėtins visas įpraiškas jūsų programoje.
Pasiskaitykite perlvar dokumentaciją apie @LAST_MATCH_START
masyvą bei ką daryti kad sulėtėjimo nebūtų.
Taip pat žiūrėkite Devel::SawAmpersand modulio dokumentaciją.

   $1, $2 ...  saugo n-tąją išsaugotą seką
   $+    Paskutinė skliausteliuose išsaugota seka
   $^N   Holds the most recently closed capture
   $^R   Saugo (?{...}) išraiškos rezultatą
   @-    Saugo grupių pradžios vietas. $-[0] saugo viso atitikimo pradžią
   @+    Saugo grupių pabaigos vietas. $+[0] saugo viso atitikimo pabaigą

Grupės yra numeruojamos pagal atsidarančius skliaustelius.

FUNKCIJOS

   lc          Pakeisti simbolių eilutę į mažąsias raides
   lcfirst     Pakeisti simbolių eilutės pirmą simbolį į mažąjį raidę
   uc          Pakeisti simbolių eilutę į didžiąsias raides
   ucfirst     Pakeisti simbolių eilutės pirmą simboliį į didžiąją raidę
   pos         Grąžinti arba nustatyti dabartinę įpraiškos atitikimo vietą
   quotemeta   Išvengti meta simbolių
   reset       Atnaujina ?pattern? statusą
   study       Analizuoja simbolių, kad galėtų optimizuoti įpraiškų taikymą

   split       Naudoja įpraiškas skaidant eilutę į dalis

AUTORIUS

Iain Truskett.

Šis dokumentas platinamas tokiomis pat sąlygomis kaip ir pats Perlas.

Vertė: Petras Kudaras. Laukiu pataisymų, nes vertimas baisus.

TOLIMESNĖ INFORMACIJA

  • perlretut pamokos apie įpraiškas.

  • perlrequick greitos pamokos apie įpraiškas.

  • perlre detalesnei informacijai.

  • perlvar detalesnei informacijai apie kintamuosius.

  • perlop detalesnei informacijai apie operatorius.

  • perlfunc detalesnei informacijai apie funkcijas.

  • perlfaq6 dažnai užduodamiems klausimams apie įpraiškas.

  • re modulio, kuris pakeičia įpraiškų veikimą ir padeda jas
    išriktinti, dokumentacija.

  • perldebug — Įpraiškų išriktinimas

  • perluniintro, perlunicode, charnames ir locale
    detalesnei informacijai apie įpraiškas ir internacionalizaciją.

  • Mastering Regular Expressions, Jeffrey Friedl
    (http://regex.info/) geram įpraiškų supratimui.

DĖKUI

David P.C. Wollmann,
Richard Soderberg,
Sean M. Burke,
Tom Christiansen,
Jim Cromie,
ir
Jeffrey Goff
už naudingus patarimus.

Kaip matuot produktyvumą?

Perlmonksuose
radau labai įdomų klausimą
: Kaip matuoti programuotojo
produktyvumą?
. Ganėtinai standartiška yra skaičiuoti per dieną
parašomas kodo eilutes, bet kas jeigu vienas programuotojas parašo du
kart daugiau, bet palieka penkis kart daugiau riktų? Ar jis
produktyvesnis už tą, kuris parašė mažiau, bet tvarkingiau? Kartais per
dieną gali būti parašomas ir neigiamas skaičius eilučių – kartais
optimizuojant kodas sutrumpinamas. Kaip skaičiuoti produktyvumą tokiu
atveju?

Atrodo kad geriausia būtų skaičiuoti projektui sugaištą laiką, bet ir
čia kyla problemų, nes juk kodo kokybė gali skirtis. Žodžiu diskusijoje
netgi pasirodė nuomonė, kad measuring is evil, nes kaip palygint
kas daugiau nuveikė – ar programuotojas kuris per aplink pats
apsirašinėjo algoritmą, ar tas, kuris paėmė jau gerai veikiantį modulį
ir dviem eilutėmis padarė visą darbą?

Kaip vienas produktyvumo matų buvo paminėtas ir iš ekstremalaus
programavimo paimtas matas velocity. Labai
įdomi diskusija, jei kas domisi šiais dalykais.

Naktinėjimai Kaune

Vat vakar su why2liu ir
Xawieru buvom papramogaut Kaune.
Pradėjom žaisdami pūlą kaip supratau tame pačiame kabake, kur vyko
paskutinis kaunietiškas mytas. Man ten baisiai sekėsi, o why2liui teko
laimė laimėti tik vieną partiją. Na bet čia neesmė. Kalbos savaime
suprantama krypo į kompiuterastines temas. Why2liz susiparinęs dėl www
čempionato
, nors aš nematau tame jokios tragedijos. Čempionatai
lieka čempionatais, juk svetainės daromos ne dėl čempionatų ;) O dėl
pono Burgio tai manau irgi visų nuomonė aiški ;)

Toliau šiek tiek aptarėm perl.lt reikalus, pasirodo why2liz pradėjo
programuotojo kelią būtent nuo Perlo. Aišku bandžiau jį įkalbėt grįžt į
Tikrąjį Kelią TM. Buvo aptartas ir prastas MySQL bei java
palaikymas ant FreeBSD (dėl prasto threadingo), hackeriai/skanuotojai ir
kitokie adminų rūpesčiai. Aišku buvo gvildenamas ir svarbus klausimas
kas gims Xawierui: mergaitė ar berniukas.

Po kelių bokalų ir kokios dešimties partijų patraukėm į klubą
„Amerika Pirtyje“. Kadangi susišnekėt kompiuterastinėmis
temomis ten nebuvo įmanoma dėl garsios muzikos, tai toliau gėrėm ir ėjom
šokt. Žmonių tam klube tikrai buvo maža, ir šiaip įspūdžio kažkaip
nepadarė. Na, Kaunas gi ;) Pamenu kažkas pradėjo laistytis alum, truputį
bardakas buvo, bet nieko ypatingo. Why2liz su Xawieru išvažiavo kokią
antrą nakties, aš – dar už kokio pusvalandžio.

Grįžęs namo sėdau prie IRC, ir atrodo buvau ganėtinai nusivylęs tuo
klubu nes šiandien #php topike mano žodžiai „o ash mergos
neturiu, uzhtad mano 7 kompai mod_perl kerta =] shiandie pirma kart
lankiausi klube kaune – liudnokas vaizdelis shiaip. nei su mergom
apie java pashnekesi nei ka :/“

Perl.lt idėjos

Nepraėjo nei trys dienos nuo to laiko kai parašiau jog gavom perl.lt domeino kontrolę, o jau vis
dažniau sulaukiu klausimų kada ten atsiras svetainė. Tad manau reikia
paaiškinti kaip aš tai įsivaizduoju.

perl.lt yra hostinama pas mr2 KTU
barako serveryje. Ten galų gale ir atsidurs visa svetainė. Developinimui
galima pilnai naudoti mano serveriuką hacks.perl.lt, kuris tikrai
nestebuklingas, bet testavimui jo turėtų pakakti. Juolab nebaisu jog jei
kas ir sugrius, nes beveik daugiau niekam tas serveriukas ir
nenaudojamas. Aš norėčiau, jog perl.lt būtų kuriama ne manęs, ne
mr2, ar dar kažkokio būtent vien žmogaus, o visos bendruomenės (na…
kiek čia tos Perlo bendruomenės…). Tad kviečiu prisidėti prie jos
kūrimo visus tiek idėjomis, tiek kodu, tiek kritika. Taipogi tikiu, kad
bus gal kam nors įdomu stebėti patį kūrimo procesą bei skaityti Perlo
kodą, kuris bus naudojamas. Manau kad tai irgi praverstų žmonėms, kurie
tik bando išmokti Perlo, bet realiai jo dar nenaudoja. Todėl per
savaitgalį šitam tikslui planuoju pakurti anoniminį CVS serverį ant
hacks.perl.lt, kad visi galėtų matyti naujausią kodą. Bendravimui
tarp susidomėjusių žmonių matyt dar reikės ir mailing listo.

Bent jau pradžioje į CVS dėti kodą galėsiu turbūt tik aš, bet jei
siųsite pataisymus ar lopus tai tikrai juos peržiūrėjęs stengsiuosi
įdėti į CVS medį. Šiaip norėtųsi, kad rašyti į CVS galėtų tik vienas ar
keli žmonės, o ne daugelis. Taip būtų atsijojami geri/blogi pataisymai,
pakeitimai ir panašiai (aišku jei jų bus :). Tai čia labiau
organizaciniai kodo rašymo klausimai.

Bet aišku prieš pradedant rašyti kodą reikia nuspręsti mes
rašome, ko mums reikia ir panašiai. Reikia nuspręsti kaip atrodys
sistema, kaip bus saugomi duomenys ir t.t. Žodžiu reikia planuotis. Čia
savo nuomonę gali išreikšti tikrai daugelis žmonių, nes reikia nuspręsti
ko reikia pačioje svetainėje, o tai žinote tik jūs. Aš mintyse esu
susidaręs šiokį tokį planą kaip turėtų atrodyti svetainė, bet kol kas
iki kodo ar duomenų bazių struktūros nepriėjau. Artimiausiu metu
bandysiu paaiškinti šią savo viziją ir galėsit ją laisvai kritikuot.
Aišku stengsiuosi į pastabas atsižvelgt :)

Va kai nuspręsim ką mes darom, tada galėsim spręsti kaip tai darom ir
galų gale pradėt tai daryt. Ir visur reikia jūsų komentarų bei pastabų,
jų tikrai lauksiu.

Žodžiu jeigu trumpai, tai artimiausi dalykai susiję su perl.lt bus:
CVS pakūrimas, mailing listo įsteigimas bei diskusija apie tai ko mes
norime perl.lt šiame mailing liste. Kviečiami dalyvauti visi, kurie
galbūt netgi dar tik ruošiasi naudotis Perlu. Kviečiami prisidėti visi,
kas yra potencialūs perl.lt vartotojai.