Select Code to Download

#!/user/bin/perl
use strict;
...
        print "$first_number / $second_number = $divide\n";
    }
}

#!/user/bin/perl
use strict;
...
    print "$first_number $_ $second_number = ", eval "$first_number $_
+ $second_number", "\n"
        for $second_number != 0 ? qw(+ - * /) : qw(+ - *);
}