The Condition that Ate Michigan

        sub each_file {
          return unless  -T $_ ;

          print "processing $File::Find::name\n";
          ...
        }

Everything moves one level closer to the left margin
The eye likes to move down the left-hand margin
Keep normal control flow close to the left-hand margin
This minimizes eye movement and improves readability