Select Code to Download

#!/usr/bin/perl
use strict;
...
print $biweekly->contains($date), ' ', $date->ymd, $/;
$date->add('days' => 7);
print $biweekly->contains($date), ' ', $date->ymd, $/;

C:\Perl\bin>perl N:\Perle\Learn\DateTime\pm_1033231_orig_analyse_003_h
+.pl
This is the set with defined 'end':
...
1 2013-06-11
1 2013-06-18