you use a lot of trailing control statements, such as:

do_something() if (condition);
do_something($_) foreach (@array);
[download]

I use these frequently, too, but I would try to restrict their use in a program where maximum readability is a goal. People who are using Perl as their non-primary language can get thrown off by these. (I know, because I was in that category until recently.)

The basic trailing if statements are straightforward, but a trailing foreach in conjunction with some fairly complex code can make things get messy. A regular foreach or if statement would allow things to spread out onto multiple lines, making things more readable.

When's the last time you used duct tape on a duct? --Larry Wall