sub oddDigitSum {
    no warnings 'numeric';
    my @ans;
    for(@_) {
        my @digits = split //, $_;
        my $sum;
        $sum += $_ for @digits;
        $sum % 2 && push @ans, $_;
    }
    return @ans;
}