for( my $i = 0; $i <= $#array; $i++) {
                       unless (($first->{$t1}->{$array[$i]}) == ($second->{$t2}->{$array[$i]}) ) {
 
                        chomp($first->{$t1}->{$array[$i]});
print SENDMAIL "<Cell ss:StyleID=\"s22\"><Data ss:Type=\"String\">$first->{$t1}->{$array[$i]}</Data></Cell>\n";
                          }
                        else {
                        chomp($first->{$t1}->{$array[$i]});
                        printcell($first->{$t1}->{$array[$i]});
                           }
                           
                            }