use Data::Dumper;
my %SeqRec = (foo => 'bar');

print ("content of hash is " . Dumper \%SeqRec);