Added Perl 'next' command