Help for this page

Select Code to Download


  1. or download this
    use v5.12;
use warnings;
...
Dump($str2);                            # shows UTF8 flag

warn '$str eq $str2: ', $str eq $str2;  # same
  2. or download this
        
SV = PV(0x6bcea8) at 0x26485f0
  REFCNT = 1
...
  LEN = 66
$str eq $str2: 1 at d:/perl/pm/t_devel_peek.pl line 28.