my @undefined = grep !defined $stats{$_}, keys %stats;
if(@undefined { 
    local $" = ", ";
    my $undefined = @undefined;
    warn "$undefined values were not defined, for keys (@undefined)\n";
}