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

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

##</code><code>##

content of hash is $VAR1 = {
          'foo' => 'bar'
        };