use Scalar::Util qw(dualvar);
my $true_zero = dualvar(0,"my true zero is better than yours");
[download]

Since that's a real zero. None of this string being parsed as zero stuff.