1#!/usr/bin/perl 2 3use warnings; 4use strict; 5 6use Date::Manip; 7if (DateManipVersion() >= 6.00) { 8 $::ti->feature("DM6",1); 9} 10 11$::ti->skip_all('Date::Manip 6.xx required','DM6'); 12 13$::testdir = $::ti->testdir(); 14chdir($::testdir); 15 161; 17# Local Variables: 18# mode: cperl 19# indent-tabs-mode: nil 20# cperl-indent-level: 3 21# cperl-continued-statement-offset: 2 22# cperl-continued-brace-offset: 0 23# cperl-brace-offset: 0 24# cperl-brace-imaginary-offset: 0 25# cperl-label-offset: 0 26# End: 27