my ($key, @array[0,1], undef, $value) = split " ", $string, 6; # Split five times, ignore the sixth value