The following test program
#!/usr/bin/perl
sub main() {
$key = 5 ;
print <<"TARGET" ;
Foobar
Snafu
${\(interp($key))}
TARGET
}
sub interp {
my ($arg) = @_ ;
print "Hello World, $arg \n" ;
return;
}
main();
gives the following output
--
Hello World 5
Foobar
Snafu
--
I am stumped at this out-of-order execution path, Am I doing something
wrong ?
Regards, Yusuf
--
Yusuf Goolamabbas
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
- Re: Interpolating function call in here documents causes... Yusuf Goolamabbas
