Date-Ordinal

 view release on metacpan or  search on metacpan

Ordinal.pm  view on Meta::CPAN

corresponding to the month name, if such exists.

The match is a regexp match, so both 'Mar' and 'March' will return 3.

If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.pm,v  view on Meta::CPAN

corresponding to the month name, if such exists.

The match is a regexp match, so both 'Mar' and 'March' will return 3.

If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm,v  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.pm.~10~  view on Meta::CPAN

corresponding to the month name, if such exists.

The match is a regexp match, so both 'Mar' and 'March' will return 3.

If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm.~10~  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.pm.~1~  view on Meta::CPAN

=item month2ord()

This function takes a month name and returns the integer
corresponding to the month name, if such exists.
If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm.~1~  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.pm.~2~  view on Meta::CPAN

=item month2ord()

This function takes a month name and returns the integer
corresponding to the month name, if such exists.
If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm.~2~  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.pm.~9~  view on Meta::CPAN

corresponding to the month name, if such exists.

The match is a regexp match, so both 'Mar' and 'March' will return 3.

If the argument could not be identified as a month name,
then C<undef> will be returned:

    $ord = month2ord('March');

The case of the month name is not important.
See the section L<KNOWN BUGS AND LIMITATIONS> below.

=back

=cut

#=======================================================================
sub ord2month
{
    my $ord = shift;

Ordinal.pm.~9~  view on Meta::CPAN

	    ? "0$_[0]"
	    :   $_[0]
	    )
	;
}    


#-----------------------------------------------------------------------


=head1 KNOWN BUGS AND LIMITATIONS

none

=head1 SEE ALSO

=over 4

=item Locale::US 


Ordinal.text  view on Meta::CPAN


            The match is a regexp match, so both 'Mar' and 'March' will
            return 3.

            If the argument could not be identified as a month name, then
            `undef' will be returned:

                $ord = month2ord('March');

            The case of the month name is not important. See the section the
            section on "KNOWN BUGS AND LIMITATIONS" below.

QUERY ROUTINES
    There is one function (and a reference variant) which can be used to
    obtain a list of all month names:

    `all_month_names()'
                Returns a list of all month names;

    `all_month_names_ref()'
                Returns a reference to a list of all month names;

Ordinal.text  view on Meta::CPAN

                and the month name

    `all_month_ordinations()'
                returns a reference  a hash of the ordination of a month name
                and the month name

PRETTY-PRINTING ROUTINES
    `prezero()'
                if the current number is single-diit, prefix it with a '0'

KNOWN BUGS AND LIMITATIONS
    none

SEE ALSO
    Locale::US
    Date::Manip
AUTHOR
    Terrence Brannon <tbrannon@end70.com>

COPYRIGHT
    Copyright (c) 2000 End70 Corporation

README  view on Meta::CPAN


            The match is a regexp match, so both 'Mar' and 'March' will
            return 3.

            If the argument could not be identified as a month name, then
            `undef' will be returned:

                $ord = month2ord('March');

            The case of the month name is not important. See the section the
            section on "KNOWN BUGS AND LIMITATIONS" below.

QUERY ROUTINES
    There is one function (and a reference variant) which can be used to
    obtain a list of all month names:

    `all_month_names()'
                Returns a list of all month names;

    `all_month_names_ref()'
                Returns a reference to a list of all month names;

README  view on Meta::CPAN

                and the month name

    `all_month_ordinations()'
                returns a reference  a hash of the ordination of a month name
                and the month name

PRETTY-PRINTING ROUTINES
    `prezero()'
                if the current number is single-diit, prefix it with a '0'

KNOWN BUGS AND LIMITATIONS
    none

SEE ALSO
    Locale::US
    Date::Manip
AUTHOR
    Terrence Brannon <tbrannon@end70.com>

COPYRIGHT
    Copyright (c) 2000 End70 Corporation

README.~1~  view on Meta::CPAN


    month2ord()
            This function takes a month name and returns the integer
            corresponding to the month name, if such exists. If the
            argument could not be identified as a month name, then
            `undef' will be returned:

                $ord = month2ord('March');

            The case of the month name is not important. See the
            section the section on "KNOWN BUGS AND LIMITATIONS"
            below.

QUERY ROUTINES
    There is one function (and a reference variant) which can be
    used to obtain a list of all month names:

    `all_month_names()'
                Returns a list of all month names;

    `all_month_names_ref()'

README.~1~  view on Meta::CPAN

                and the month name

    `all_month_ordinations()'
                returns a reference  a hash of the ordination of a month name
                and the month name

PRETTY-PRINTING ROUTINES
    `prezero()'
                if the current number is single-diit, prefix it with a '0'

KNOWN BUGS AND LIMITATIONS
    none

SEE ALSO
    Locale::US
    Date::Manip
AUTHOR
    Terrence Brannon <tbrannon@end70.com>

COPYRIGHT
    Copyright (c) 2000 End70 Corporation



( run in 0.466 second using v1.01-cache-2.11-cpan-fd5d4e115d8 )