I run the following script :
$a = 160;
$b = 256;
for ($i=$a;$i<=$b;$i++)
{
$str = join '', $str, pack 'U*', $i;
}
if ($str =~ /(\p{inlatin1supplement}+)/)
{
print "\$1 : $1\n";
}
on redirecting above o/p to od -tc -tx, $1 has 2 bytes
for all matching code point values (160-255).
If the above test is repeated with $a = 192, $b = 256,
$1 has 1 byte for all matching code point values
(192-255).
Why is this so ?
Thanks in advance,
Rajarshi.
_________________________________________________________________
Millions of marriage proposals.
http://www.bharatmatrimony.com/cgi-bin/bmclicks1.cgi?74 Find your match on
BharatMatrimony.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
