Re: Bug#1915: Perl doesn't like the number 0
Peter Tobias spoke unto the world:
>Package: perl
>Version: 5.002-1 (a.out)
>The following program prints "0.e-1" instead of "0".
>for ($j = 0; $j <= 7; $j++) {
> print "$j\n";
>}
I've not been able to duplicate this anywhere using a.out under linux or
any other machines that I have access to.
Script started on Tue Nov 28 20:34:21 1995
[0]~/work/debian/perl/perl5.002 perv:-) uname -a
Linux perv 1.2.13 #3 Thu Sep 21 01:26:52 PDT 1995 i486
[0]~/work/debian/perl/perl5.002 perv:-) perl -e '
quote> for ($j = 0; $j <= 7; $j++) {
quote> print "$j\n";
quote> }
quote> '
0
1
2
3
4
5
6
7
[0]~/work/debian/perl/perl5.002 perv:-) exit
Script done on Tue Nov 28 20:35:19 1995
Script started on Tue Nov 28 19:40:14 1995
[0]~/hack/perl5.002beta1 pentagon:-) uname -a
BSD/OS pentagon.io.com 2.0 i386
[0]~/hack/perl5.002beta1 pentagon:-) ./perl -e '
quote> for ($j = 0; $j <= 7; $j++) {
quote> print "$j\n";
quote> }
quote> '
0
1
2
3
4
5
6
7
[0]~/hack/perl5.002beta1 pentagon:-) exit
Script done on Tue Nov 28 19:41:14 1995
Script started on Tue Nov 28 17:19:06 1995
[0]~/hold/perl5.002beta1 inotest6:-) uname -a
SunOS inotest6 4.1.3_U1 1 sun4m
[0]~/hold/perl5.002beta1 inotest6:-) ./perl -e '
quote> for ($j = 0; $j <= 7; $j++) {
quote> print "$j\n";
quote> }
quote> '
0
1
2
3
4
5
6
7
[0]~/hold/perl5.002beta1 inotest6:-) exit
script done on Tue Nov 28 17:19:30 1995
Script started on Tue Nov 28 19:22:17 1995
[0]~/hold/perl5.002beta1 inotest5:-) uname -a
SunOS inotest5 5.4 Generic_101945-32 sun4m sparc
[0]~/hold/perl5.002beta1 inotest6:-) ./perl -e '
quote> for ($j = 0; $j <= 7; $j++) {
quote> print "$j\n";
quote> }
quote> '
0
1
2
3
4
5
6
7
[0]~/hold/perl5.002beta1 inotest6:-) exit
script done on Tue Nov 28 19:23:17 1995
Reply to: