本人使用的Perl Builder的2.0版本,发现两个问题
问题1:现在执行以下代码:
$input=<STDIN>;
print $input;
测试输入数据:testdata
输出:
.testdata使用的是Perl Builder的Output。
导致的后果:无法得到想要的结果。
例如:
@array=qw [a b c d e f];
$input=<STDIN>;
print @array[$input];
测试数据:4
正确结果:e
实际结果:a
原因:因为$input里面实际存放的是输入的数据4,但是到了@array[$input]这里,就变成了@array[.4]了,对于.4,perl的处理是先根据上下文将其确认为数字标量,然后对0.4取整是0,所以就输出了数组的第一个元素a。
但是,将这段程序在命令行下面执行,就不会有问题,在Perl Expr……