Subject: | possible simple bug... |
Date: | Sat, 28 Jun 2014 19:23:01 -0700 |
To: | "bug-Perl-Dist-Strawberry [...] rt.cpan.org" <bug-Perl-Dist-Strawberry [...] rt.cpan.org> |
From: | Doon Wish <atmp_tmp [...] yahoo.com> |
using windows 7, currently up to date (as of 6-2814)
Perl-Dist-Strawberry CPAN distribution:
Strawberry Perl 5.18.2.2 (32bit)
for Windows XP or higher, Apr 2014
the following program runs under both windows cmd window and
cygwin 1.7.28 downloaded 2-15-14
from: http://www.cygwin.com/
program:
use strict;
use warnings;
my $a;
$a = 0100;
print "\n\n \$a is: " . "$a" . "\n\n";
print "\n\n" . '\076' . " = > is: " . "\076" . "\n\n";
print "\n\n" . '\077' . " = ? is: " . "\077" . "\n\n";
print "\n\n" . '\0100' . " = @ is: " . "\0100" . "\n\n";
print "\n\n" . '\0101' . " = A is: " . "\0101" . "\n\n";
print "\n\n" . '\x3E' . " = > is: " . "\x3E" . "\n\n";
print "\n\n" . '\x3F' . " = ? is: " . "\x3F" . "\n\n";
print "\n\n" . '\x40' . " = @ is: " . "\x40" . "\n\n";
print "\n\n" . '\x41' . " = A is: " . "\x41" . "\n\n"
the output: (some \n's removed):
$perl a.pl
$a is: 64
\076 = > is: >
\077 = ? is: ?
\0100 = @ is:0 <--- a problem? should be "@"
\0101 = A is:1 <--- a problem? should be "A"
\x3E = > is: >
\x3F = ? is: ?
\x40 = @ is: @
\x41 = A is: A
seems to be in issue with octal notation across a boundary.
hope this isn't user error.
david johnson
Message body is not shown because it is too large.