####
if (1) {
    ####
    my $x = do { #### };
    # gueltig hier
    for (42) {
        # gueltig hier
    }
    # gueltig hier
}
####