[Akkadius]

1) You have to access the hash elements the same way every single time.

quest::movepc($porthash{$key}[1], $porthash{$key}[2], $porthash{$key}[3], $porthash{$key}[4], $porthash{$key}[5]);

2) The API call is quest::movepc not quest::movenpc