C:\> 1071094.pl
Use of uninitialized value $ENV{"HOME"} in concatenation (.) or string at D:\_Perl_\PMonks\1071094.pl line 19.
$ratio: 0.8113   $currency_from CHF      $currency_to: EUR
$ratio: 0.8113,          $currency_from CHF,     $currency_to: EUR
FOO: 40.565