File Coverage

blib/lib/Locale/Hebrew/Calendar.pm

Criterion	Covered	Total	%
statement	12	16	75.0
branch			n/a
condition			n/a
subroutine	4	6	66.6
pod	0	2	0.0
total	16	24	66.6

# $File: //member/autrijus/Locale-Hebrew-Calendar/Calendar.pm $ $Author: autrijus $
# $Revision: #3 $ $Change: 3587 $ $DateTime: 2003/01/17 05:30:22 $

package Locale::Hebrew::Calendar;

use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);

=head1 NAME

Locale::Hebrew::Calendar - Jewish Calendar

=head1 VERSION

This document describes version 0.03 of Locale::Hebrew::Calendar,
released January 17, 2003.

=head1 SYNOPSIS

    # 'g2j' and 'j2g' may be exported explicitly
    use Locale::Hebrew::Calendar;

    # Gregorian to Jewish
    ($d, $m, $y) = Locale::Hebrew::Calendar::g2j($dd, $mm, $yy);

    # Jewish to Gregorian
    ($d, $m, $y) = Locale::Hebrew::Calendar::j2g($dd, $mm, $yy);

=head1 DESCRIPTION

This is an XSUB interface to a code which can be found on several main
FTP servers.  Neither Ariel nor Autrijus have contacted the author, but
"He who says things in the name of their originators brings redemption
to the world" -- The actual code was written by Amos Shapir.

=cut

use Exporter;
use DynaLoader;

@ISA = qw(Exporter DynaLoader);
@EXPORT = ();
@EXPORT_OK = qw( g2j j2g );
$VERSION = '0.03';

__PACKAGE__->bootstrap($VERSION);

sub g2j {
    @{_g2j(shift, shift, shift)};
}

sub j2g {
    @{_j2g(shift, shift, shift)};
}

1;

__END__