my $foo = foo();  # Declared when needed

...

print $foo;