Re: Nested Heredocs and Shell Escapes (code)

Umm, the problem is the test. echo doesn't read stdin! Try

% foo=bar
% cat<<EOF
>$foo
>EOF
bar
[download]

If you want to preserve the "$foo" do

% foo=bar
% cat<<'EOF'
>$foo
>EOF
$foo
[download]

--traveler

Comment on Re: Nested Heredocs and Shell Escapes (code) Select or Download Code

Replies are listed 'Best First'.
Re: Re: Nested Heredocs and Shell Escapes (code) by no_slogan (Deacon) on Jun 09, 2001 at 00:01 UTC
Good call. Perl's << is a bit different from the shell's, so you can't blindly translate `print` to `echo` in the perl code `print <<FOO bar FOO` [download] This should probably be mentioned in perltrap, but it's not. Aside from the quoting issue, it's never going to work the way deprecated seems to want, because environment variables don't get passed from child back to parent. If you want to set variables in your current shell, you need to do something like this: $ eval `perl -e 'print "FOO=bar"'` $ echo $FOO bar [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: Nested Heredocs and Shell Escapes (code)
by no_slogan (Deacon) on Jun 09, 2001 at 00:01 UTC

print

echo

print <<FOO
bar
FOO
[download]

Aside from the quoting issue, it's never going to work the way deprecated seems to want, because environment variables don't get passed from child back to parent. If you want to set variables in your current shell, you need to do something like this:

$ eval `perl -e 'print "FOO=bar"'`
$ echo $FOO
bar
[download]

[reply]
[d/l]
[select]