![ICQ [62610883]](http://blog.air4web.com/bblog/templates/markon/img/icq_status/){kind=small}
Krysa v Perlu
07.07.2005
Na světě se nachází milióny kancelářských krys, které jsou svědomité, spolehlivé, slušné a blbé. Po mé předchozí zkušenosti s kancelářskou nízko placenou krysou jsem se jí rozhodl kapitalisticky nahradit. Nevydělala si na sebe, zdržovala projekty a vytvářela šanonový balast.
Jak to začalo?
Potřeboval jsem na internetu shromáždit informace o konkurenci, začít komunikaci s partnery a rozjet byznys. Protože jsem byl docela zaneprázdněn, hodil jsem všechnu práci na jednoduchou kancelářskou krysu, která se práce zhostila.
Nejdříve jsem kryse musel vysvětlit přesně do postupu co má dělat, poté jsem ještě musel snížit její iniciativu, pochopit co a proč to vlastně dělá, a nakonec jsem po třech týdnech zavrhl spolupráci. Proč?
![lg-go-away-tshirt.jpg [9320 bytes]](http://blog.air4web.com/bblog/pbimages/7657fe7a3db0a35a53ccd102f5314eea.jpg)
Kancelářská krysa měla stále nějaké problémy s počítačem, na mých poličkách začali přibývat ty prehistorické šanony (to se ještě používá?) a hlavně vedení společnosti začlo oceňovat pracovitost kancelářské krysi více než mě. Uznávám, dělal jsem trojnásobek práce, měl nohy na stole a telefonoval s kámošema, ale kancelářská krysa nedělala nic, vypadala naprosto zaneprázdněně, vyškrtávala si své šanony a v práci vypadala zaručeně upracovaně.
Rychlý konec
Dnes jsem konečně našel chvilku a začal psát perlové skripty. Trošku jsem zabrousil do archivu cpan.org, stáhnul pár znalostí kancelářské krysy, spojil dohromady a zvýšil výkonnost tisíckrát. Tři týdny práce kancelářské krysy jsem zkrátil na dvě hodiny programování. Dvě hodiny! A to jsem u toho ještě vyřídil telefonát do elektronického obchodu a objednal si počítačovou hru.
Chudák krysa, co teď bude dělat? Její inteligenci jsem shrnul do třech CPAN modulů a dvaceti řádků kódu. Už vím proč mě nechtějí zaměstnat ve státní správě. Představte si milión úředníků ve pěti řádcích Perlu. Jak?
#!/usr/bin/perl
if($papir in @pravomoc){
print "razitko";
} else {
print "neni v pravomoci naseho uradu/ministerstva";
}
od anicka
08.07.2005 #tohle by se ti mohlo libit: http://www.thinkgeek.com/...rts/frustrations/374d/
od Jirka
08.07.2005 #Ac to rikam nerad (trochu me to samotneho prekvapuje), tak s tebou vyjimecne ve vsem souhlasim
od markon
08.07.2005 #2Jirka: Abys nesouhlasil, opravdu je to tak. Včera přetekl pohár tolerance mého kolegy. To, že mi vezme větrák, ok, to že mi vezme lepší židli, ok, to že mi vymění LCD za menší, ok, ale hrabat se mi v šuplíkách a ukázat, že tam mám nepořádek to je moc, to přehnal.
Tak jsem ho prostě přeprogramoval do Perlu.