Date-Pregnancy
view release on metacpan or search on metacpan
lib/Date/Pregnancy.pm view on Meta::CPAN
=head2 40 Weeks
This method does not use the APCL, but simply counts 40 weeks, the
number of weeks in an average pregnancy from the LMP date.
=head2 Count Back
The count back method adds 7 days to the LMP, then deducts 3 months, and
finally adds 1 year to give the estimated date of birth.
=head1 TEST DATA
I am very interested in improving this module, so if you have the
opportunity of submitting me test data it is more than welcome.
The format should be either a test file (*.t), where you choose the
file name yourself (see t/Villads.t) or you simply submit me the date
of the first day of the last period for the pregnant person, the length of
time between periods (if this varies from the avarage of 28), and possibly
the result of your own/your doctor's week number calculation. I can
then use these data to validate the calculation methods used in this
module.
If possible please include the information on what method your doctor
is using if this is available (SEE: METHODS).
=head1 BUGS
Please report issues via CPAN RT:
http://rt.cpan.org/NoAuth/Bugs.html?Dist=Date-Pregnancy
or by sending mail to
bug-Date-Pregnancy@rt.cpan.org
See the BUGS file for known bugs.
=head1 SEE ALSO
=over
=item L<DateTime>
=item L<Sex>
=item L<Time::Clock::Biological>
=item L<http://www.paternityangel.com/Articles_zone/How_it_happens/How-6.htm>
=item L<http://javascript.internet.com/calculators/pregnancy.html>
=item L<http://www.plus-size-pregnancy.org/figuring.htm>
=back
=head1 DISCLAIMER
The method of calculating day of birth and week numbers implemented in
this module is based on simple formulas.
The ultrasound scan is a much more accurate method and finally babies
seem to have a will of their own, so please do only use the results of
this module as a guideline, the author of this module cannot be held
responsible for the results of calculations based on use of this module.
Feedback is welcome though as well as test data (please see TEST DATA
above).
=head1 ACKNOWLEDGEMENTS
=over
=item * Nick Morrott, corrections to multiple spelling errors
=item * Thomas Eibner, who ALWAYS asks me whether I am a father by now
and acuses me of pregnant-talk (just because he cannot calculate the
weeks), now he can find out by looking at the tests included in this
module or by using this module.
=item * Lars Balker Rasmussen, who could not find Date-Pregnancy in his include
path "lbr can't locate Date/Pregnancy.pm in @INC" - Now he has no
excuse L<Date::Pregnancy> is a reality.
=item * Lars Thegler for making me revisit the alpha version.
=back
=head1 AUTHOR
Jonas B. Nielsen, (jonasbn) - C<< <jonasbn@cpan.org> >>
=head1 COPYRIGHT
Date-Pregnancy is (C) by Jonas B. Nielsen, (jonasbn) 2004-2016
Date-Pregnancy is released under the artistic license 2.0
=cut
( run in 2.009 seconds using v1.01-cache-2.11-cpan-22024b96cdf )