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. 

Bug#914651: perl: -i option broken

[Igor Liferenko]

Package: perl
Version: 5.28.0-3
Severity: important

Dear Maintainer,

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


-- System Information:
Debian Release: buster/sid
  APT prefers testing
  APT policy: (500, 'testing')
Architecture: amd64 (x86_64)

Kernel: Linux 4.17.0-1-amd64 (SMP w/4 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8), 
LANGUAGE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /usr/bin/dash
Init: systemd (via /run/systemd/system)

Versions of packages perl depends on:
ii  dpkg   1.19.0.5+b1
ii  libperl5.285.28.0-3
ii  perl-base  5.28.0-3
ii  perl-modules-5.28  5.28.0-3

Versions of packages perl recommends:
ii  netbase  5.4

Versions of packages perl suggests:
pn  libb-debug-perl 
pn  liblocale-codes-perl
pn  libterm-readline-gnu-perl | libterm-readline-perl-perl  
ii  make4.2.1-1.1
ii  perl-doc5.28.0-3

-- no debconf information