in reply to heredoc and Carriage return
I can confirm the behaviour in 5.25.5 (built on September 16) on Linux.
#!/usr/bin/perl use warnings; use strict; use feature qw{ say }; my $nix = << '__NIX__'; line 1 line 2 __NIX__ my $win = << '__WIN__'; # ^M present at end of lines. line 1 line 2 __WIN__ # ^M present here, too: my $quoted = 'line1 line2 '; say /\r/ for $nix, $win, $quoted;
I can't find it documented anywhere.
Update: It doesn't work for normal quoted strings, either.
($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: heredoc and carriers return
by LanX (Saint) on Oct 25, 2016 at 09:43 UTC | |
Re^2: heredoc and carriers return
by LanX (Saint) on Oct 25, 2016 at 11:10 UTC | |
by choroba (Cardinal) on Oct 25, 2016 at 12:15 UTC |
In Section
Seekers of Perl Wisdom