use warnings; use strict; use Data::Dump qw(dd); my $something_else = { ..., }; dd $something_else;