Desfazendo objetos Perl e construindo o método TO_JSON para convert_blessed

Noesta resposta [https://stackoverflow.com/a/4185679/632407]Encontrei uma recomendação para uma simplesTO_JSON , necessário para serializar objetos abençoados para JSON. sub TO_JSON { return { %{ shift() } }; }Alguém poderia explicar em detalhes ...