for ( $entirely{TOO}[$long]{$var} ) {
   $_ = 42 if $_ < 5;
}