$_ = " one two three four five six"; @ary = split; print $ary[3]; #### $str = " one two three four five six"; $str =~ s/^\s+//; # remove leading spaces @ary = split /\s+/, $str; print $ary[3];