Active State Perl


Perl je programovacφ jazyk, kter² si zφskal statisφce p°φznivc∙ po celΘm sv∞t∞. S jeho pomocφ m∙╛ete psßt u╛iteΦnΘ programy na n∞kolika °ßdcφch, ale takΘ programy mnohem slo╛it∞j╣φ.

Perl pochßzφ ze sv∞ta UNIXu, dφky spoleΦnosti Active State jej v╣ak nynφ m∙╛ete pou╛φvat i pod operaΦnφm systΘmem Windows. Pokud rozumφte alespo≥ trochu anglicky, tato distribuce obsahuje velmi dob°e zpracovanou nßpov∞du, kterß vßm ulehΦφ vstup do sv∞ta Perlu. Pokud se Perl nauΦφte a Φasem p°estoupφte na UNIX (Linux bude za n∞kolik let roz╣φ°en∞j╣φ ne╛ Windows), va╣e znalosti se vßm budou hodit, proto╛e se jednß o velmi oblφben² jazyk systΘmov²ch administrßtor∙.

Pokud se Perl uΦφte, mßte velkou v²hodu v tom, ╛e na rozdφl od jin²ch programovacφch jazyk∙ velmi rychle budete um∞t psßt prvnφ u╛iteΦnΘ programy.

Tak nap°φklad tento program nalezne v╣echna Φφsla v souborech v souΦasnΘm adresß°i, seΦte je a souΦet vytiskne. Sami musφte uznat, ╛e tento program nenφ rozhodn∞ dlouh².

opendir DIR, ".";
$sum = 0;

foreach $f (readdir DIR)
{
	open IN, $f;
	read IN, $tmp, 5000000;
	close IN;
	$sum += $1 while ($tmp =~ /(\d+)/g);
}
print $sum; 

P°eji vßm mnoho ╣t∞stφ s va╣im experimentovßnφm. Po instalaci Active Perl naleznete velmi kvalitnφ pomoc v nßpov∞d∞ Active Perl. V adresß°i html otev°ete soubor index.html a zbytek nechßvßm na vßs.

Pokud mßte p°φstup k Internetu, na nßsledujφcφch strßnkßch naleznete °adu informacφ:

Informace v Φe╣tin∞:

a v anglickΘm jazyce:

Miloslav NiΦ