The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Random::Day - Class for random day generation.

SYNOPSIS

 use Random::Day;
 my $obj = Random::Day->new(%params);
 my $dt = $obj->get;
 my $dt = $obj->random;
 my $dt = $obj->random_day($day);
 my $dt = $obj->random_day_month($day, $month);
 my $dt = $obj->random_day_month_year($day, $month, $year);
 my $dt = $obj->random_month($month);
 my $dt = $obj->random_month_year($month, $year);
 my $dt = $obj->random_year($year);

METHODS

new(%params)
 Constructor.
  • day

     Day.
     Default value is undef.
  • dt_from

     DateTime object from.
     Default value is DateTime object for 1900 year.
  • dt_to

     DateTime object to.
     Default value is DateTime object for 2050 year.
  • month

     Month.
     Default value is undef.
  • year

     Year.
     Default value is undef.
get()
 Get random date defined by constructor parameters.
 Returns DateTime object for date.
random()
 Get random date.
 Returns DateTime object for date.
random_day($day)
 Get random date defined by day.
 Returns DateTime object for date.
random_day_month($day, $month)
 Get random date defined by day and month.
 Returns DateTime object for date.
random_day_month_year($day, $month, $year)
 Get date defined by day, month and year
 Returns DateTime object for date.
random_month($month)
 Get random date defined by month.
 Returns DateTime object for date.
random_month_year($month, $year)
 Get random date defined by month and year.
 Returns DateTime object for date.
random_year($year)
 Get random date defined by year.
 Returns DateTime object for date.

ERRORS

 new():
         From Class::Utils::set_params():
                 Unknown parameter '%s'.

 random_day():
         Day cannot be a zero.
         Day isn't number.

 random_day_month():
         Cannot create DateTime object.
         Day cannot be a zero.
         Day isn't number.

 random_day_month_year():
         Cannot create DateTime object.
                 Error: %s
         Day cannot be a zero.
         Day isn't number.

 random_month():
         Cannot create DateTime object.
                 Error: %s

 random_month_year():
         Cannot create DateTime object.
                 Error: %s

EXAMPLE

 use strict;
 use warnings;

 use Random::Day;

 # Object.
 my $obj = Random::Day->new;

 # Get date.
 my $dt = $obj->get;

 # Print out.
 print $dt->ymd."\n";

 # Output like:
 # \d\d\d\d-\d\d-\d\d

DEPENDENCIES

Class::Utils, DateTime, DateTime::Event::Random, DateTime::Event::Recurrence, English, Error::Pure.

SEE ALSO

Data::Random

Perl module to generate random data

REPOSITORY

https://github.com/tupinek/Random-Day

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

 © Michal Josef Špaček 2013-2017
 BSD 2-Clause License

VERSION

0.07