$text->{$line}[$pos - 1] = $word;
       ^ ^      ^
       | |      |
       | hash   |
dereference    array