Perl

I've become interested in Perl, studied some basics and decided I like it. So I want to become good at it. Does /prog/ have any tips/hints for a beginning Perl student?

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/