My personal preference is to have braces ...

My practice for largeish scripts is to have a block with a nice, big label on it and protection for unexpected exit from the block:

MAIN: {

    ...

    exit;  # normal script exit

    }  # end MAIN loop

die "unhandled script exit";

# subroutines ###############################################

...
[download]