output_hash(\%data);

sub output_hash {
    my ($href, $item) = @_;
    die "Not a hashref" if ref($href) ne 'HASH';
    $item ||= [];

    ...
}