sub get_days {
        my ($mon) = @_;
        ...;
    }