※ 引述《maxmafiona (努力!!努力!!)》之銘言：
: 首先感謝兩位大大的解答，讓小弟獲益良多，不過小弟還是遇到了困難
: 程式如下：
: #!/usr/perl/bin/perl
: use XML::Simple;
: $xs = new XML::Simple();
: $ref = $xs ->XMLin('c:\usr\home\ISO2709.xml');
: $c = $ref -> {'Field'}[1] -> {'Fix'};
: print $c."\n";
: #印出 chr(30)."0 "
: 接下來用大大所教我的.....
: $b = "$a = $ref -> {'Field'}[1] -> {'Fix'}";
別忘了這邊
雙引號會做變數內插
你可以這樣用
$b = q/$a = $ref -> {'Field'}[1] -> {'Fix'}/;
: eval $b;
: print "the original a is $a";
: 印不出東西來，完全空白，照理說應該至少要印出0 才對阿??
: (因為chr(30)本來就印不出來)，所以後面的應該要印出來，可是卻是一片空白
: 還請大大再指導我一下，麻煩囉..謝謝您^^
--
Errors,like straws,upon the surface flow;
He who would search for pearls must dive below.
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.244.211