add PERL introduction