foreach $line (@data) {
		if ( ($line =~ /*disregard this*/)) {  
		   # If nextline date = previous line date
                       # Append next line to current line

              # Else append the value 0