##
$VAR1 = '-39.99994';\n
##
##
print Dumper \%some_hash;
##
##
#!/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 <<<";
##
##
-39.9999400000
-99.99985
-39.99994
Number in a string >>> -39.99994 <<<