-sub GetRepeatableHolidays{
-my ($date_dues,$itemnumber,$difference) = @_;
-my $dateinsec=UnixDate($date_dues,"%o");
-my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =localtime($dateinsec);
-my @result=GetWdayFromItemnumber($itemnumber);
-my @dayclosedcount;
-my $j;
-
-for (my $i=0;$i<scalar(@result);$i++){
- my $k=$wday;
-
- for ( $j=0;$j<$difference;$j++){
- if ($result[$i]->{'weekday'} == $k)
- {
- push ( @dayclosedcount ,$k);
+sub GetRepeatableHolidays {
+ my ( $date_dues, $itemnumber, $difference ) = @_;
+ my $dateinsec = UnixDate( $date_dues, "%o" );
+ my ( $sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst ) =
+ localtime($dateinsec);
+ my @result = GetWdayFromItemnumber($itemnumber);
+ my @dayclosedcount;
+ my $j;
+
+ for ( my $i = 0 ; $i < scalar(@result) ; $i++ ) {
+ my $k = $wday;
+
+ for ( $j = 0 ; $j < $difference ; $j++ ) {
+ if ( $result[$i]->{'weekday'} == $k ) {
+ push( @dayclosedcount, $k );