1 #!/usr/bin/perl
2 
3 # Write a program that prompts for and reads two numbers (on separate lines of
4 # input) and prints out the product of the two numbers multiplied together.
5 
6 use warnings;
7 use strict;
8 use utf8;
9 
10 print "x = ";
11 chomp(my $x = <STDIN>);
12 print "y = ";
13 chomp(my $y = <STDIN>);
14 
15 print "product of x*y = " . $x * $y . "\n";