#!/usr/bin/env perl -l

use strict;
use warnings;

my $val = '-39.9999400000';
print $val;
print 2.5 * $val;

my $val2 = -39.9999400000;
print $val2;
print "Number in a string >>> $val2 <<<";