# want fourth word
my $str   = "one two three four five";
my @array = split / /, $str;
my $word  = $array[3];

##</code><code>##

my $str  = "one two three four five";
my $word = ( split / /, $str )[3];