Help for this page

Select Code to Download


  1. or download this
    C:\>perl -E "print 'your input please: ' ; my $input = <>; say $input;
    +"
    your input please: 1 2 32
    1 2 32
    
  2. or download this
    C:\>perl -E "print 'Enter nums: '; use Data::Dumper;@numbers; push @nu
    +mbers, split while <>; say Dumper @numbers;"
    Enter nums: 3 5 7 912 11
    ^Z
    ...
    $VAR3 = '7';
    $VAR4 = '912';
    $VAR5 = '11';