$checks{'data'} =~ s/\s+/ /g;
 # remove leading and trailing blanks
 $checks{'data'} =~ s/^\s+//;
 $checks{'data'} =~ s/\s+$//;