Select Code to Download

use strict;
use warnings;
...
);

print Dumper(\%ifac);

$VAR1 = {
          '6.105' => 'KI',
...
          '6.27' => 'JID',
          '14.152' => 'JCI'
        };