Skip Menu |

This queue is for tickets about the TermReadKey CPAN distribution.

Report information
The Basics
Id: 120148
Status: new
Priority: 0/
Queue: TermReadKey

Owner: Nobody in particular
Requestors: johan.laenen [...]

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Subject: Term::Prompt messes with $\ because of the lastest change 2.34 in Term::Readkey
Date: Wed, 8 Feb 2017 21:02:20 +0100
To: bug-TermReadKey [...]
From: Johan Laenen <johan.laenen [...]>
Download (untitled) / with headers
text/plain 818b
Hi, The following oneliner gives two lines of output instead of the three I expect to see: perl -e 'use Text::Wrap; use Term::Prompt qw/prompt/; my $p = prompt("y", "", "", ""); { local $\="\n"; print "the quick brown fox" } {local $\="\n"; print "jumps over the lazy dog." };' yields: (y or n) [default n] the quick brown foxjumps over the lazy dog. I expected: (y or n) [default n] the quick brown fox jumps over the lazy dog. Now, this is on debian strech/sid, perl v5.24.1, Term::Readkey 2.37 and Term::Prompt 1.04. If I downgrade Term::Readkey to 2.33 the code above works as expected. 2.34 "Fix GetTerminalSize() argument handling". 2.33 is accidentally *ignoring* the argument and using \*STDOUT. 2.34 is working right... which causes it to get far enough to break something. Greetings, Johan Laenen

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to