Hi ultranerds,

Works for me. Can you post an SSCCE that reproduces the problem on your end? Note that Devel::Peek prints to STDERR, are you sure you're not redirecting that to somewhere else?

$ perl -wMstrict -MDevel::Peek -e 'Dump("foo");'
SV = PV(0x21783a0) at 0x20a31e0
  REFCNT = 1
  FLAGS = (POK,IsCOW,READONLY,PROTECT,pPOK)
  PV = 0x20b7f20 "foo"\0
  CUR = 3
  LEN = 10
  COW_REFCNT = 0
[download]

Regards,
-- Hauke D

Thanks for the reply. There must be something funky going on :/ This simple test script:

#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
print "Content-Type: text/html\n\n";#
print "BLA";
use Devel::Peek;
Dump("foo");
print "HERE\n";
[download]

From the browser, I get:

BLAHERE 

Yet it work fine from SSH:

perl test.cgi
Content-Type: text/html

SV = PV(0x2518cd0) at 0x2535bc0
  REFCNT = 1
  FLAGS = (POK,READONLY,IsCOW,pPOK)
  PV = 0x268bb90 "foo"\0
  CUR = 3
  LEN = 10
  COW_REFCNT = 0
BLAHERE
[download]

Any ideas?

Thanks!

Hi ultranerds,

As I said, the output is to STDERR, which won't be sent to the browser, it'll most likely end up in your server log instead. As far as I can tell, Devel::Peek does not offer an option to change where its output goes, even its tests have to jump through some hoops to get its output. The following is the best I can come up with off the top of my head, perhaps another monk knows a better method.

$ perl -wMstrict 2>/dev/null
use Devel::Peek;
use Capture::Tiny qw/capture_stderr/;
my $dump = capture_stderr { Dump "foo" };
print $dump;
[download]

Hope this helps,
-- Hauke D

Keep in mind that `Dump` writes to STDERR, not STDOUT.

Furthermore, it might not be affected by attempts to redirect STDERR from within Perl.

(The third snippet you posted is wrong.)

This has already been pointed out ikegami

Great!