Use sprintf:

    my $price = 240;
    $price = sprintf "%.2f", $price;
    print $price;
[download]

prints

    240.00
[download]