started Perl adventure