Help for this page

Select Code to Download


  1. or download this
    my $file = "somefile.utf8";

...
$_ = <$in>;
use Devel::Peek;
Dump $_;
  2. or download this
    SV = PV(0x793cd0) at 0x7c53e0
  REFCNT = 1
...
  PV = 0x7c9088 "\357\273\277foo b\303\244r"\0 [UTF8 "\x{feff}foo b\x{
+e4}r"]
  CUR = 11                                               ^^^^
  LEN = 80