On Tue, 29 Mar 2005 11:08:05 +0530, Rajarshi Das wrote:
Hi,
I am running a EastAsianWidth property test on z/OS using perl-5.8.6.
$str = chr(0xA1).chr(0xA2);
if ($str =~ /(\p{EastAsianWidth: A}+)/)
{
print "match";
}
else
{
print "no match";
}
I'm using perl-5.8.6 on Linux and your code p
On Tue, 29 Mar 2005 11:08:05 +0530, Rajarshi Das wrote:
> Hi,
> I am running a EastAsianWidth property test on z/OS using perl-5.8.6.
>
> $str = chr(0xA1).chr(0xA2);
>
> if ($str =~ /(\p{EastAsianWidth: A}+)/)
> {
> print "match";
> }
> else
> {
> print "no match";
> }
>
I'm using per
Hi,
I am running a EastAsianWidth property test on z/OS using perl-5.8.6.
$str = chr(0xA1).chr(0xA2);
if ($str =~ /(\p{EastAsianWidth: A}+)/)
{
print "match";
}
else
{
print "no match";
}
First, is the above regex supposed to mean this : does $str contain chars
one or more of which has a "
