argra****@users*****
argra****@users*****
2018年 7月 19日 (木) 16:26:37 JST
Index: docs/perl/5.12.1/perldebtut.pod diff -u docs/perl/5.12.1/perldebtut.pod:1.1 docs/perl/5.12.1/perldebtut.pod:1.2 --- docs/perl/5.12.1/perldebtut.pod:1.1 Fri Jun 15 16:35:16 2012 +++ docs/perl/5.12.1/perldebtut.pod Thu Jul 19 16:26:36 2018 @@ -669,16 +669,7 @@ =end original - DB<2> x $obj - 0 MY_class=HASH(0x828ad98) - 'attr' => HASH(0x828ad68) - 'col' => 'black' - 'things' => ARRAY(0x828abb8) - 0 'this' - 1 'that' - 2 'etc' - 'unique_id' => 123 - DB<3> +そして見てみましょう: DB<2> x $obj 0 MY_class=HASH(0x828ad98)