for $boxes (@find_text) {
  if (length($boxes->value) > 100) {
     print $boxes->value;
  }
}