my %application;
...
$application[$key] = $data[$application_pos];

I think this line from here should be
    $application{$key} = $data[$application_pos];
(square [] vice {} curlies).

Update: Line in question was changed to
    my $key = $data[$application_pos];