How would you implement object-oriented design patterns in a dynamic scripting language like Perl or Python?