Bug#914651: perl: -i option broken

[gregor herrmann]

Control: forwarded -1 https://rt.perl.org/Public/Bug/Display.html?id=133659
COntrol: tag -1 + upstream patch

On Mon, 26 Nov 2018 08:18:15 +0700, Igor Liferenko wrote:

> The following command yields "a":
> 
>     ( echo a ; echo b ; echo c ) | perl -pe 'last if /b/'
> 
> The following command yields "abc" (one character on a line):
> 
>     ( echo a ; echo b ; echo c ) >/tmp/x; perl -i -pe 'last if /b/' /tmp/x; cat /tmp/x

This sounds like upstream bug
https://rt.perl.org/Public/Bug/Display.html?id=133659
to me.


Cheers,
gregor

-- 
 .''`.  https://info.comodo.priv.at -- Debian Developer https://www.debian.org
 : :' : OpenPGP fingerprint D1E1 316E 93A7 60A8 104D  85FA BB3A 6801 8649 AA06
 `. `'  Member VIBE!AT & SPI Inc. -- Supporter Free Software Foundation Europe
   `-   BOFH excuse #211:  Lightning strikes.