in reply to Re: Trubs with HERE docs
in thread Trubs with HERE docs

The only problem with this is that you get an unwanted leading "\n" on the string ( as well as the leading whitespace common to indented herepages ).

The good news is that this issue will be fixed in Perl 6 with indented herepage tokens allowed and automatic whitespace stripping.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

Replies are listed 'Best First'.
Re: Re: Re: Trubs with HERE docs
by extremely (Priest) on Sep 05, 2001 at 20:35 UTC
    Well, if you are assigning the value rather than printing it directly you can do this ugliness: 
    (my $k= q(
        Blah Blah Blah
        Blah Blah Blah
)) =~ s/^\s+|(?s:\s+$)//gm;

print "<<$k>>\n";

    [download]

    *shame*

    --
    $you = new YOU;
    honk() if $you->love(perl)

[reply]
[d/l]

In Section Seekers of Perl Wisdom