if ($table->cell($rownum, 0..2) =~ /\xa0/) { s/\xa0\d+/ /; } else { s/\xa0//; }