for (0..$theTable->maxcol())
    {
    my $cellText = $theTable->cell ($row, $_)->as_text ();
    
    
#  Next two lines are for searching and replacing nbsp's with regular
# spaces or evaluate such that if $celltext ='s nbsp or * not 
#to print it   
#   printf("nbsp is \\x{%04X}\n", ord(substr($string, $pos, 1)));
#   printf("nbsp is \\x{%04X}\n", ord(substr($cellText, $row, 1)));
#    s/\x{1234}/ /g;


    print "$cellText ";
    }