#!/usr/bin/perl -w
print "I was going to multiply two numbers but can't decide on them.\n";
print "Please provide the first for me : ";
chomp($first = <STDIN>);
print "Please provide the second for me : ";
chomp($second = <STDIN>);
print "The product is : " . $first * $second . "\n";