Added Perl examples