#! /usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

my $str; do { local $/; $str = <DATA>; };
my $hash = { split /\s+/, $str };
print Dumper $hash;

__DATA__
ER 
  34
9YT
  44
EE
  66