Przyklady z ksiazki Programming Perl