in reply to IYHO, what do you consider good code?
for me good code means what was already mentioned but also to have good structured code. Don't use to much subs, but try to give it a structure which also helps to make it reusable. If it's getting big think about putting parts of the code you might want to use again in a small module etc...
Also learn to have a strict an clean style, which you always use and not change to often. I personally prefer to have a more K&R-styled style than the usual perl-style...
Also only use tabs for indenting and not for lining up stuff etc. Have a look at perltidy if you can't manage to have a strict style yourself.