[ANNOUNCE] London Perl Mongers Technical Meeting 2013-09-19

2013-08-25 Thread Leon Brocard 
London Perl Mongers organises technical meetings every two months. The
technical meetings are a chance to find out what has been going on in
the Perl community, what techniques people are using and how Perl
integrates with other software.

The next technical meeting will be on the 2013-09-19 from 7pm to 9pm
(you may arrive earlier, please sign in at the reception). You have to
sign up to attend: see below.

This meeting is sponsored by NET-A-PORTER and will be held at their
offices in Westfield London near White City/Shepherds Bush. Many thanks
to Kristian Flint, NET-A-PORTER and everyone involved for allowing us to
use this wonderful venue.

Talks

Jérôme Étévé: "Mason - A Template system for us programmers"
David Leadbeater: "Redis and App:redisp"
Ash Berlin: "SSO with LDAP: making system automators angry"
Savio Dimatteo:  "CSS::SpriteMaker in action"

For more details and to sign up, please visit:

  http://www.meetup.com/London-Perl-Mongers/events/136132092/

Regards, Leon

Unexpected lc behaviour

2013-08-25 Thread Mark Fowler 
I'm trying to lowercase capital e-acute and turn it into lowercase e-acute.
 Can anyone explain why this is different?

mark@travis-5:~$ perl -le 'print ord lc chr 201'
201
mark@travis-5:~$ perl -lE 'print ord lc chr 201'
233

Or for that matter:

perl -le 'my $chr = chr ord "\N{LATIN CAPITAL LETTER E WITH ACUTE}"; print
ord lc $chr'
201
perl -le 'my $chr = "\N{LATIN CAPITAL LETTER E WITH ACUTE}"; print ord lc
$chr'
233

I tried it on 5.12, 5.16 and 5.18 (later example obviously not tried as is
with 5.12)

It's not something as obvious as the utf-8 flag being on or off, since
changing -e to -E doesn't turn that on.

perl -MDevel::Peek -e 'Dump chr(201)'
SV = PV(0x7f955c004490) at 0x7f955c0133e0
REFCNT = 1
FLAGS = (POK,READONLY,pPOK)
PV = 0x7f955bc04850 "\311"\0
CUR = 1
LEN = 16

perl -MDevel::Peek -E 'Dump chr(201)'
SV = PV(0x7ff3f10044a0) at 0x7ff3f10133e0
REFCNT = 1
FLAGS = (POK,READONLY,pPOK)
PV = 0x7ff3f0c0ce30 "\311"\0
CUR = 1
LEN = 16

perl -MDevel::Peek -e 'Dump "\N{LATIN CAPITAL LETTER E WITH ACUTE}"'
SV = PV(0x7fb103849160) at 0x7fb1038133f8
REFCNT = 1
FLAGS = (POK,READONLY,pPOK,UTF8)
PV = 0x7fb103411db0 "\303\211"\0 [UTF8 "\x{c9}"]
CUR = 2
LEN = 16

Mark.

-- 
Mark Fowler
http://www.twoshortplanks.com/

Re: Unexpected lc behaviour

2013-08-25 Thread Roger Bell_West 
On Sun, Aug 25, 2013 at 11:47:29AM -0400, Mark Fowler wrote:
>I'm trying to lowercase capital e-acute and turn it into lowercase e-acute.
> Can anyone explain why this is different?

Erm, same as the answer to the identical message you posted last
Monday?

R