Select Code to Download

open my $fh, '>', 'junk.dat' or die $!;

...
    use Devel::Peek;
    Dump $_;
}

SV = PV(0x189fd70) at 0x18c0a38
  REFCNT = 1
...
  PV = 0x18a4610 "4444444444444444444444444444444444444444444444444444
+44444444444444444444444444\r\n"\0
  CUR = 80
  LEN = 200

$ perl -E 'say "\0\0\0ABC"
ABC
$ perl -E 'say "\0\0\0ABC"' | perl -nE 'printf "%vx\n", $_'
0.0.0.41.42.43.a