Help for this page

Select Code to Download


  1. or download this
    my $start = ParseDate('now');
my $end = "2017123123:59:59";

# Instead of
my ($start, $end) = qw(2017-01-01 2017-12-31);
  2. or download this
    #!/usr/bin/perl
use strict;
...
Number of months: 12
Number of years: 1
Number of payments: 25
  3. or download this
    for my $date (@datesEvery15th) {
    if (Date_IsWorkDay($date)) {
...
2017-11-23
2017-12-08
2017-12-22
  4. or download this
    #!/usr/bin/perl
use strict;
...
          'week(s)' => '3',
          'month(s)' => '2'
        };