Chinaunix

标题: 数组调试和打印的信息不一致 [打印本页]

作者: pidan 时间: 2009-11-14 18:06
标题: 数组调试和打印的信息不一致
===Start to Replace EntityID of SPMEntityIns Table===
main::deal_SPMEntityIns(./mkpkg:4200):
4200: print $SpmEntityInsArray[1][1]." EntityID===\r\n";
DB<2> pinr^H^H
Unrecognized character \x08 at (eval 73)[/usr/lib/perl5/5.8.8/perl5db.pl:628] line 2.
at (eval 73)[/usr/lib/perl5/5.8.8/perl5db.pl:628] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop;
pi;r

;' called at /usr/lib/perl5/5.8.8/perl5db.pl line 628
DB::eval called at /usr/lib/perl5/5.8.8/perl5db.pl line 3412
DB:

B called at ./mkpkg line 4200
main::deal_SPMEntityIns('/home/pengwei/tool/baseinfo.xml') called at ./mkpkg line 4236

  DB<3> pirn

  DB<4> print $SpmEntityInsArray

  DB<5> ^[[A^[[A^[[B
Unrecognized character \x1B at (eval 76)[/usr/lib/perl5/5.8.8/perl5db.pl:628] line 2.
at (eval 76)[/usr/lib/perl5/5.8.8/perl5db.pl:628] line 2
;    eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop;

;' called at /usr/lib/perl5/5.8.8/perl5db.pl line 628
DB::eval called at /usr/lib/perl5/5.8.8/perl5db.pl line 3412
DB:

B called at ./mkpkg line 4200
main::deal_SPMEntityIns('/home/pengwei/tool/baseinfo.xml') called at ./mkpkg line 4236

  DB<6> print $SpmEntityInsArray[1]
ARRAY(0x8f2ae70)
  DB<7> print $SpmEntityInsArray[1][0]
lam
  DB<8> print $SpmEntityInsArray[1][1]
88
  DB<9> n
EntityID===
main::deal_SPMEntityIns(./mkpkg:4201):
4201: if ( $SpmEntityInsArray[$j][0] eq $CpgName )
4202: {

作者: cobrawgl 时间: 2009-11-14 19:41

我这里好好的啊

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)