[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Alguem aí manja de perl, especialmente conversão de data ?



convertí de perl para bash, ficou melhor no bash.

2008/10/3 Davi Vidal <davividal@siscompar.com.br>:
> On Friday 03 October 2008 11:56:13 hamacker wrote:
>> 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 <vcr@kyxar.fr>
>> 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/processo
>>CompraFuncoesAjax.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 ?
>
>        Você pode postar uma ou duas linhas do access.log?
>
> --
> Davi Vidal
> --
> E-mail: davividal at siscompar dot com dot br
> MSN   : davividal at msn dot com
> GTalk : davividal at gmail dot com
> Skype : davividal
> YIM   : davi_vidal
> ICQ   : 138815296
>
>
> --
> To UNSUBSCRIBE, email to debian-user-portuguese-REQUEST@lists.debian.org
> with a subject of "unsubscribe". Trouble? Contact listmaster@lists.debian.org
>
>


Reply to: