Alguem aí manja de perl, especialmente conversão de data ? Tenho esse script perl : #!/usr/bin/perl -p # exibe o arquivo de log do squid no formato .csv # Squid2csv by Vincent Chartier <[EMAIL PROTECTED]> s/^\d+\.\d+/localtime $&/e;s/^[A-Z]/"$&/g;s/[ ][ ]*/";"/g;s/\n/"$&/g
O que ele basicamente faz é colocar uma linha /var/log/squid/access.log no formato CSV, assim : "Fri";"Oct";"3";"11:51:53";"2008";"124";"192.168.1.60";"TCP_MISS/304";"265";"GET";"http://www.cvc.com.br/site/resources/scripts/processoCompra/processoCompraFuncoesAjax.js";"fulano";"DIRECT/189.56.9.57";"-"; Eu gostaria de saber como alterar a linha perl acima para juntar a data assim : 2008/10/03_11:51:53 ao inves do "Fri";"Oct";"3";"11:51:53";"2008" que é feito atualmente. Sou uma negação em perl. Será que alguem poderia dar uma maozinha ? -- Mais sobre o Ubuntu em português: http://www.ubuntu-br.org/comece Lista de discussão Ubuntu Brasil Histórico, descadastramento e outras opções: https://lists.ubuntu.com/mailman/listinfo/ubuntu-br
