If a programmer writes code that is that bad in Perl, they will write code that is that bad in Python. They will write code that is that bad in C or in Ruby or in Haskell. No language will make programmers who don't care about good code to write good code.