Help for this page

Select Code to Download


  1. or download this
    (undef, @list) = split /\s+/, $str;
  2. or download this
    @list = (split /\s+/, $str)[1..$#a];