W
gdb --batch -ex 'x Perl_eval_pv("open $::fh, q!>!, qq!/tmp/foo.$$.log!; *STDERR = $::fh", 0)' -ex 'x Perl_eval_pv("use Devel::Gladiator qw/arena_table/; warn arena_table();", 0)' -p $pidС перлом работаешь-то? ))
Size: a a a
W
gdb --batch -ex 'x Perl_eval_pv("open $::fh, q!>!, qq!/tmp/foo.$$.log!; *STDERR = $::fh", 0)' -ex 'x Perl_eval_pv("use Devel::Gladiator qw/arena_table/; warn arena_table();", 0)' -p $pidС перлом работаешь-то? ))
VG
W
perl -e 'use Devel::MAT::Dumper' && gdb --batch -ex 'x Perl_eval_pv("use Devel::MAT::Dumper; Devel::MAT::Dumper::dump(\"/tmp/foo.$$.pmat\")", 0)' -p $pidЭто второе что используется )))
ММ
W
ММ
W
ММ
W
ММ
ММ
W
VG
ММ
W
ММ
W
W
ММ
W