use Data::Dumper;
require 'dat.pl';

print Data::Dumper::Dumper($hash_ref);