Object-oriented perl practicing, and script enhancing