Fixed "break" and "continue" generation to Perl.