Expandir texto de modelo com perl embutido
