use Data::Dumper; print Dumper(\%faclist);