Analiza el código fuente Perl proporcionado para generar una representación de árbol de sintaxis abstracta (AST) en JSON