[32538] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 3803 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 27 09:09:20 2012

Date: Sat, 27 Oct 2012 06:09:03 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Sat, 27 Oct 2012     Volume: 11 Number: 3803

Today's topics:
    Re: Why "Wide character in print"? <whynot@pozharski.name>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Sat, 27 Oct 2012 12:30:00 +0300
From: Eric Pozharski <whynot@pozharski.name>
Subject: Re: Why "Wide character in print"?
Message-Id: <slrnk8naco.e23.whynot@orphan.zombinet>

with <vi7pl9-ui71.ln1@anubis.morrow.me.uk> Ben Morrow wrote:

*SKIP*

> (In theory you can 'use encoding' to specify a different source
> character encoding, but in practice that pragma has always been buggy
> and is better avoided.)

Stop spreading FUD.  They need

	use encoding ENCNAME Filter => 1;

(what I<ENCNAME> could possibly be?) but

    *   "use utf8" is implicitly declared so you no longer have to "use
    	utf8" to "${"\x{4eba}"}++".

what pretty much defies the purpose of C<use encoding;>.

*SKIP*

> The lexer converts the "å" into a 1-character string which eventually
> gets passed to 'say', which appends a newline (that is, a character
> with ordinal 0a) and passes it to the STDOUT filehandle for writing. 

That's not a whole story.

	{2754:13} [0:0]% perl -Mutf8 -MDevel::Peek -wle '$aa = "а" ; Dump $aa'
	SV = PV(0x927a750) at 0x9295fac
	  REFCNT = 1
	  FLAGS = (POK,pPOK,UTF8)
	  PV = 0x9291a08 "\320\260"\0 [UTF8 "\x{430}"]
	  CUR = 2
	  LEN = 12
	{2936:14} [0:0]% perl -Mutf8 -MDevel::Peek -wle '$aa = "å" ; Dump $aa' 
	SV = PV(0x9af4750) at 0x9b0ffac
	  REFCNT = 1
	  FLAGS = (POK,pPOK,UTF8)
	  PV = 0x9b0ba08 "\303\245"\0 [UTF8 "\x{e5}"]
	  CUR = 2
	  LEN = 12

For a first glance, me wondered:  what the heck is with yours
C<use warnings;>.  Now I feel much better.

*CUT*

-- 
Torvalds' goal for Linux is very simple: World Domination
Stallman's goal for GNU is even simpler: Freedom


------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests. 

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V11 Issue 3803
***************************************


home help back first fref pref prev next nref lref last post