use strict;
use warnings;

print "Please enter three numbers separated by spaces (complete by hitting the enter key)\n";
my $user_input = <>;               # get user input
chomp $user_input;                 # removing trailing newline from user input

my ($nr1, $nr2, $nr3) = split /\s+/, $user_input;          # splitting user input on spaces to get the 3 numbers

print "The sum of the three numbers is equal to ", ($nr1 + $nr2 + $nr3), "\n";
print "The product ...