Re: request to run one-liner on perl v5.8

Again from 5.8.7 on zOS 2.1
CARROS1:/usr/lpp/perl/bin: >./perl -le 'print ord("\N{U+41}")'
65


Sandra



From:   Karl Williamson <[email protected]>
To:     "[email protected]" <[email protected]>
Date:   03/30/2015 02:20 PM
Subject:        Re: request to run one-liner on perl v5.8



On 03/30/2015 11:47 AM, Karl Williamson wrote:
> Could someone with a working v5.8 Perl, please run this one-liner on it,
> and report back the output

I meant an EBCDIC v5.8 perl

>
> perl -le 'my $a = pack("U", 65); print ord $a'
>
>

And another one

perl -le 'print ord("\N{U+41}")'


> Thanks in advance
>