my $b = do { multiple_commands_here; final_command; };