use Data::Dumper; die Data::Dumper->new()->Indent(1)->Dump(\@databases)