Select Code to Download

print "input three numbers separated by spaces\n";
my $user_input = <>;

chomp $user_input;

my ($nr1) = $user_input, "$a";