Hello Yusuf,
Thursday, August 30, 2001, Yusuf Goolamabbas <[EMAIL PROTECTED]> wrote:
YG> The following test program
YG> #!/usr/bin/perl
YG> sub main() {
YG> $key = 5 ;
YG> print <<"TARGET" ;
YG> Foobar
YG> Snafu
YG> ${\(interp($key))}
YG> TARGET
YG> }
YG> sub interp {
YG> my ($arg) = @_ ;
YG> print "Hello World, $arg \n" ;
YG> return;
YG> }
YG> main();
YG> gives the following output
YG> --
YG> Hello World 5
YG> Foobar
YG> Snafu
YG> --
YG> I am stumped at this out-of-order execution path, Am I doing something
YG> wrong ?
no.
your 'print <<"TARGET"' prints TARGET _after_ constructing all TARGET
content. try
sub interp {
my ($arg) = @_ ;
return "Hello World, $arg \n" ;
}
Best wishes,
Maxim mailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
