RosettaCodeData/Task/Conditional-structures/Perl/conditional-structures-1.pl

if ($expression) {
    do_something;
}