{
    ...              # n1 lines
    my $foo = bar();
    ...              # n2 lines
    print $foo;
}