Skip Menu |

This queue is for tickets about the Perl-Dist-Strawberry CPAN distribution.

Report information
The Basics
Id: 96800
Status: resolved
Priority: 0/
Queue: Perl-Dist-Strawberry

People
Owner: Nobody in particular
Requestors: atmp_tmp [...] yahoo.com
Cc:
AdminCc:

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



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.

Subject: Re: [rt.cpan.org #96800] possible simple bug...
Date: Sun, 29 Jun 2014 23:18:42 +0200
To: bug-Perl-Dist-Strawberry [...] rt.cpan.org
From: kmx <kmx [...] volny.cz>
It is not a bug, check "Octal escapes" part of http://perldoc.perl.org/perlrebackslash.html For perls 5.14+ use: print "\n\n" . '\0100' . " = @ is: " . "\o{100}" . "\n\n"; print "\n\n" . '\0101' . " = A is: " . "\o{101}" . "\n\n"; -- kmx