C:\>perl -E "my $gap = 55; $gap = qq[$gap.00]; say $gap;" 55.00