use warnings;
my $foo = 50.0;
warn $foo;