##
use Data::Dumper;
print Dumper( $row );
####
my $base = "$row->{' base addr. (hex)'} $row->{' end addr (hex)'}";
$reghash{$base} = $row;
####
my $base = $row->{' base addr. (hex)'};
my $end = $row->{' end addr (hex)'}";
$reghash{$base}{$end} = $row;