Brilliant! This might help some people produce cleaner code. ;-)
A caveat: sometimes I get spurious error messages the first time I run it on ugly code, but it works when trying again. It seems that the perl interpreter gets confused when the source file gets modified while it's being compiled.