Select Code to Download

my $num = 4.62899;
$round = sprintf "%.2f", $num;
print "$round\n";

my $string = "0.0";
print "string $string is ", ($string ? "True" : "False"), "\n";
print "string $string is ", ($string+0 ? "True" : "False"), "\n";