[Cascavel-pm] Existe maneira de fazer um auto escape de aspas em cgi perl

[Luciano Giordani Bassani]

Olá!


Estou com um "pepinão" com um sistema desenvolvido em CGI Perl. O 
sistema já tem uns 4 anos de desenvolvimento e agora a diretoria 
resolveu que o sistema tem que aceitar ASPAS SIMPLES e DUPLAS nas 
inclusões no banco de dados, bem como para todas as outras rotinas, como 
por exemplo, consultas SQL, etc. Tudo bem, isso não chega a ser 
complicado, pois uma simples expressão regular já resolveria isso. 
Contudo, o volume de ajuste seria impraticável, pois seria necessário 
mudar todos os scripts para incluir a rotina de conversão, sendo que 
cada script ainda precisaria modificar todas as variáveis recebidas.

Gostaria de saber se alguém tem alguma dica de como aplicar isso de uma 
forma mais prática, seja com um sistema de auto escape para as aspas, ou 
quem sabe até mesmo "capturar" as solicitações diretamente do STDIN, 
alterar os dados e devolver para o processamento normal (existe um 
script que é chamado por todos, que define funções comuns: o main.pl, 
que poderia ser usado, caso houvesse uma solução como esta).

O sistema foi construído com processamento em camadas, tendo o 
javascript para validação de formulários e as cgis em Perl para o 
trabalho com o banco de dados e outras rotinas, como geração de 
contratos em pdf, etc. O SGDB usado foi o mysql, mas existe outro 
sistema menor que roda com o PostgreSQL.



SDS,

Luciano Giordani Bassani
lgb em bbsi.com.br