perl Object-Realize-Later