在perl中，如何使保持数字零的变量打印为“0”而不是“”

Question

我多年来一直在想这个...在perl中，存储在变量中的数字0在打印时被错误地转换为字符串“”。如何解决这个问题？

例如：

$X = 0;
print "X = $x\n";

人们会期望会打印出来：     X = 0

而是打印：     X =

有没有一种简单的方法可以正确地进行打印，而无需编写像这样的垃圾代码：

$x = 0;
$xstr = !$x ?  "0" : $x;
print "X = $Xstr\n";

在尝试编写执行数学和打印数学结果的程序时，这是我真正讨厌perl的一件事。

也许有一些“使用”包我可以添加到我的代码中来修复数字零作为字符串的打印？

Answer 1

你确定你的情况正确吗？在上文中，您可以定义$X，但请改为打印$x。 Perl区分大小写。

$ perl -e 'print "X = $undefined\n"'
X =