Isn't that an obfuscated way of writing a do block? :)
P:\test>perl -m-warnings=syntax -MO=Deparse,-p
if (COND) {
print ("something")
}
^Z
no warnings;
do {
print('something')
};
- syntax OK
Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"When I'm working on a problem, I never think about beauty. I think only how to solve the problem. But when I have finished, if the solution is not beautiful, I know it is wrong." -Richard Buckminster Fuller
If I understand your problem, I can solve it! Of course, the same can be said for you.