print "input three numbers separated by spaces\n"; my $user_input = <>; #### chomp $user_input; #### my ($nr1) = $user_input, "$a";
## chomp $user_input; ##
## my ($nr1) = $user_input, "$a";