http://www.perlmonks.org?node_id=953487


in reply to "if" and compound statement

You can combine statements with "do", like so:
do { statement; statement } if $condition;