Another perl object pretty-printer