Bug #93332 for Text-ProgressBar: Text::ProgressBar 0.3 under Windows 7 Home professional

Tue Feb 25 04:16:37 2014 uwe.heine [...] web.de - Ticket created

Subject:	Text::ProgressBar 0.3 under Windows 7 Home professional
Date:	Tue, 25 Feb 2014 10:16:27 +0100
To:	bug-Text-ProgressBar [...] rt.cpan.org
From:	Uwe Heine <uwe.heine [...] web.de>

Hi. "Let's do business ;-)" ----------------------------- package Text::ProgressBar; our $VERSION = '0.3'; ----------------------------- This is perl 5, version 16, subversion 3 (v5.16.3) built for MSWin32-x86-multi-thread Binary build 1603 [296746] provided by ActiveState http://www.ActiveState.com Built Mar 13 2013 11:29:21 ----------------------------- What I get: No such signal: SIGWINCH at C:/Perl/site/lib/Text/ProgressBar.pm line 36. 100%|#########################################################################| ----------------------------- OK, now more polite: [ I am forced to dwell on a Windows 7 system because the hard disk on my Linux machine crashed. My philosophy, though: love thy enemies :-) ] * I consider this error should be switched off, the TODO is minimal, only the always present administrative things. "don't work with any signal that does not exist on th current machine" (I know, even after 20+ years of Perl I still produce errors myself - so what ???) * The CPAN code sample is, on a windows system, not a good one: it led me to experiment with flushing the output (no good,I know now). The cause is: fractions of a second on a windows system (sleep 0.2) does not the expected things. Better (tested!) is a sample that works for me now: --> "select(undef, undef, undef, 0.2); I hope to help Perl to a tiny bit better future. Regards, Uwe -- Uwe Heine Wietzegraben 72 30179 Hannover T. 0162 - 837 1929 T. 0511 - 373 68 69 1

Mon Mar 03 06:32:52 2014 FARHAD [...] cpan.org - Correspondence added

RT-Send-CC:

uwe.heine [...] web.de

Hi Uwe, this module uses SIGWINCH signal, which is sent to a process when its controlling terminal changes its size. It isn't specified in POSIX, but used on various systems including Linux. I must confess, that I originally implemented 'Text::ProgressBar' and used it on a Linux system and at that time, porting to MS-Windows was not on my agenda. Finding a valid general solution for all platforms would be difficult (as you correctly mentioned due to OS dependencies). But I try to fix it in a way satisfactory for all its users. As a 'worst case' I may restrict in documentation its installation only to Linux/Unix derivates. Last but not least thank you for your bug report and I am sorry for any inconvenience that I may caused. Cheers, Farhad On Tue Feb 25 04:16:37 2014, uwe.heine@web.de wrote: Show quoted text

> Hi. > > "Let's do business ;-)" > > ----------------------------- > package Text::ProgressBar; > our $VERSION = '0.3'; > > ----------------------------- > This is perl 5, version 16, subversion 3 (v5.16.3) built for > MSWin32-x86-multi-thread > Binary build 1603 [296746] provided by ActiveState > http://www.ActiveState.com > Built Mar 13 2013 11:29:21 > > ----------------------------- > What I get: > > No such signal: SIGWINCH at C:/Perl/site/lib/Text/ProgressBar.pm line > 36. > 100%|#########################################################################| > > > ----------------------------- > > > OK, now more polite: > > [ I am forced to dwell on a Windows 7 system because the hard disk on > my > Linux machine crashed. > My philosophy, though: love thy enemies :-) > ] > > * I consider this error should be switched off, the TODO is minimal, > only the always present administrative things. > "don't work with any signal that does not exist on th current machine" > (I know, even after 20+ years of Perl I still produce errors myself - > so > what ???) > > * The CPAN code sample is, on a windows system, not a good one: it led > me to experiment with flushing the output (no good,I know now). > > The cause is: fractions of a second on a windows system (sleep 0.2) > does > not the expected things. > > Better (tested!) is a sample that works for me now: > --> "select(undef, undef, undef, 0.2); > > > I hope to help Perl to a tiny bit better future. > > Regards, > Uwe

Mon Mar 03 06:32:52 2014 The RT System itself - Status changed from 'new' to 'open'