Select Code to Download

my $newrate = 0;
### AVOID ANY NASTY DIVISION-BY-ZERO ERRORS WITH AN EVAL...
...

### IF EVAL FAILS, LET'S PRINT THE ERROR...
print $@;

my $newrate = 0;
if( $second_currency == 0 ) {
...
} else {
  $newrate = $first_currency /  $second_currency;
}