#!/usr/bin/perl
#
#

use common::sense;

use Data::Dumper;

{
    my %h;
    while(<DATA>) {
    
      my @f = split;
      $h{$f[4]} = $f[5];
    }
    print Dumper ( \%h );
}

__DATA__
3 9606 34 ACADM 187960098 NP_001120800.1

##</code><code>##

$ perl -w 867594.pl 
$VAR1 = {
          '187960098' => 'NP_001120800.1'
        };
$