Dar vieno analitiko svetainė

Petras Kudaras

Perlo Advento kalendorius

Kaip ir pernai metais, Mark Fowler sudarė perlinį advento kaledorių, kuris kiekvieną dieną iki Kalėdų pasakos apie vis naują Perlo modulį ir aiškins kaip jsuo naudotis. Kalendorių galima rasti adresu http://www.perladvent.org/2003/

Perlo objektų pradžiamokslis: pirmoji dalis

Objekto vaizdavimas Dažniausiai Perle Paskalio įrašas arba C struktūra, arba C+ klasė yra saugoma anoniminio asociatyvaus masyvo (hešo) pavidalu. Taip saugoti yra patogu, nes heše galima saugoti neribotą kiekį elementų, kuriuos galima pasiekti per unikalų hešo raktą. Jeigu tik norite kažko panašaus į C struktūrą, tai galima daryti taip: $irasas = { vardas => "Petras", amzius => 21, kolegos => [ "Juozas", "Nikolajus", "Vaidas"], }; Jeigu norite lengviau perskaitomo kodo, galite hešo raktus Skaityti toliau…

Perlinio modulio pavyzdys

Vakar IRC buvau paklaustas, kaip yra daromi objektiniai Perlo moduliai. Parašiau ir paprastą moduliuką, kuris parodo kaip veikia visas Perlo objektiškumas. Štai modulis Modulis.pm: package Modulis; use strict; use warnings; sub naujas { bless {}; } sub vardas { my $self = shift; $_[0] ? $self->{'vardas'} = $_[0] : $self->{'vardas'}; } 1; Modulis prasideda paketo apibrėžimu (package Modulis;) bei aprašo dvi funkcijas (tiksliau vieną funkciją ir vieną metodą). Funkcija naujas sukuria ir grąžina naują objektą Modulis. Skaityti toliau…

ActivePerl build 807

Pasirodė populiaros Perlo distribucijos Windows platformai ActivePerl versija. Ši versija yra kurta 5.8.1 Perlo versijos pagrindu ir turi nemažai atnaujintų modulių. Patys didžiausi atnaujinti moduliai yra XML::Parser ir Archive::Tar. Visi ActivePerl vartotojai turbūt turėtų atsinaujinti Perlo versijas į šią naująją.

Šventasis moxliukas

Nagi šiandien tapau 236-uoju Perlmonks šventuoju. Tai vat. Pasigyriau.

Acme::Apache::Werewolf

Acme::Apache::Werewolf yra naujas ir labai naudingas Perlo modulis, kuris leidžia apsaugoti Apache serverio direktorijas nuo vilkolakių. io modulio pagalba galima uždrausti priėjimą prie Apache direktorijų mėnulio pilnaties metu, tereikia į httpd.conf įrašyti: <Directory /fullmoon> PerlAccessHandler Acme::Apache::Werewolf PerlSetVar MoonLength 4 </Directory> Tris kart valio CPAN, nes dabar mano Apachei nebaisūs jokie vilkolakiai.

Perl 5.6.2

Šeštadienį buvo išleista 5.6.2 Perlo versija. Perlo 5.6.x šaka nėra mirusi, ji vis dar palaikoma. Pagrindinis šios versijos tikslas buvo galimybė sukompiliuoti Perlą su naujais įrankiais (kaip kad gcc 3.3) ir operacinėmis sistemomis, kurios atsirado jau po Perl 5.6.1 išleidimo (AIX 5 ir Mac OS X). Tuo pačiu buvo atnaujinti ir kai kurie moduliai. Parsisiųsti 5.6.2 galima iš čia.

Num2LTWord Perlu

Kai kam prireikė funkcijos, kuri verstų skaičius į lietuvių kalbą. Tad parašiau Perlinį moduliuką – gal bus dar kam nors naudingas. (Parsiųsti kaip normalų modulį galima iš čia) #!/usr/bin/perl -w package Num2LTWord; =head1 Num2LTWord -- skaičiai lietuviškai Modulis verčiantis (sveikus) skaičius į lietuvių kalbą =head2 NAUDOJIMAS use Num2LTWord; num2ltword(2003); =head2 FUNKCIJOS =head3 num2ltword ( skaičius ) Ši funkcija grąžina suformuotą lietuvišką skaičiaus pavadinimą. =head2 RIKTAI IR APRIBOJIMAI Funkcija C<num2ltword> supranta tik sveikus skaičius intervale (- 1 000 000 000; 1 000 000 000) =head2 AUTORIUS Petras Kudaras aka moxliukas (moxliukas@delfi. Skaityti toliau…

IE įdomybės ir bluejackinimas

Labai įdomus dalykas, kurį šiandien aptikau benaršydamas internetą buvo Internet Explorerio featuras, kurio pagalba galima išsikviesti Notepad. Tereikia parašyti kažką panašaus į: <img src="view-source:file:///C:/WINNT/system32/shell32.dll"> Ir jei jūsų Windows sėdi kataloge C:WINNT, greit pajausite kaip Notepad pradeda prakaituoti stengdamasis parodyti bylą shell32.dll. O juk galima įdėti ir kelias tokia nuorodas ir staiga swape gali atsirasti kokia pora gigabaitų duomenų. Įdomu dar ir tai, kad tokių dalykų nepagauna jokios Popup blokavimo programos. Tiesiog tai vienas iš Internet Explorer featurų. Skaityti toliau…

Testai perl-dev

Pridėjau šiandien į perl-dev CVS kodo testus. Šiaip atrodo Lietuvoje niekas lyg ir nedaro web aplikacijų kartu su testais (test based programming), nors Perlmonksuose teko girdėti apie tai nemažai. Esmė yra tame, kad pakeitus kažkokį failą automatiškai prasitestuojama ar viskas veikia kaip ir turėtų, ar tie pakeitimai nesugriovė kokio nors kodo kuris seniau jau veikė. Šiek tiek gal ir su eXtreme Programming susiję (ten pradžioj parašomas testas kuris neveikia, o paskui stengiamasi padaryt kad jis Skaityti toliau…