C:\>perl -E "print 'your input please: ' ; my $input = <>; say $input;"
your input please: 1 2 32
1 2 32

##</code><code>##

C:\>perl -E "print 'Enter nums: '; use Data::Dumper;@numbers; push @numbers, split while <>; say Dumper @numbers;"
Enter nums: 3 5 7 912 11
^Z
$VAR1 = '3';
$VAR2 = '5';
$VAR3 = '7';
$VAR4 = '912';
$VAR5 = '11';