![]() |
Olá e boas-vindas de Estados Unidos para o UNIX e Linux Forum! Obrigado por visitar e fazer parte da nossa comunidade global.
|
|
google unix.com
|
|||||||
| Fóruns | Registar | Fórum Regimento | Ligações | Álbuns | FAQ | Lista deputados | Calendário | Pesquisa | Today's Posts | Mark Forums Read |
| Programação Shell Script e Post perguntas sobre ksh, CSH, SH, BASH, Perl, PHP, SED, Awk e outros scripts shell e shell scripts línguas aqui. |
Mais UNIX e Linux Fórum Tópicos Você pode achar Helpfull
|
||||
| Fio | Thread Starter | Fórum | Respostas | Última postagem |
| Porque gerar "cinzas e bash" diferentes para a mesma saída bash script? | s. murat | Programação Shell Script e | 0 | 05-26-2008 08:19 |
| Passando opções para um script bash | DeCoTwc | Programação Shell Script e | 3 | 05-21-2008 02:43 |
| [BASH - ksh] Passando array para uma função | ripat | Programação Shell Script e | 3 | 04-17-2008 09:17 |
| Como você analisar uma variável em um script bash? | vertical98 | Programação Shell Script e | 3 | 03-18-2008 04:30 |
| Conversão de bash script para analisar perl? | cstovall | Programação Shell Script e | 2 | 10-13-2004 11:33 |
![]() |
|
|
Linkback | Thread Tools | Pesquisar este Thread | Rate Thread | Display Modes |
|
|
|
||||
|
Todas oi,
Preciso passar uma variável para perl script de bash script, onde em perl Estou usando o caso condição. Aqui está o cmd o que estou usando no perl Código:
FROM_DATE="06/05/2008" TO_DATE="07/05/2008" "perl -ne ' print if ( $_ >="$FROM_DATE" && $_ <= "$TO_DATE" ) ' filename" Código:
06/05/2008-07:59 06/05/2008-07:59 06/05/2008-07:59 06/05/2008-07:59 06/05/2008-07:59 07/05/2008-07:59 07/05/2008-07:59 07/05/2008-07:59 07/05/2008-07:59 07/05/2008-07:59:server5:DISK 08/05/2008-07:59:server1:DISK 08/05/2008-07:59:server2:DISK 08/05/2008-07:59:server3:DISK 08/05/2008-07:59:server4:DISK 08/05/2008-07:59:server5:DISK ele será um ótimo se alguns telle me Como passar para a variável perl corretamente. ![]() Eu sou novo para perl mundo. Obrigado Arsidh Última edição por Yogesh Sawant; em 05/22/2008 12:57.. Motivo: adicionado código tags |
|
||||
|
Yogesh oi,
Obrigado pelo seu valioso contributo, e Obrigado pela resposta sobre o assunto. Eu incluí o sugeestion, você me disse, mas quando eu executá-lo, não estou recebendo todos os dados, o que eu quero, mas o comentário do arquivo. Aqui está o código modificado: \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d #! / bin / bash FROM_DATE \u003d "04/05/2008" TO_DATE \u003d "06/05/2008" perl -ne 'print if ($ _> \u003d $ ENV (' FROM_DATE ') & & $ _ <\u003d $ ENV (' TO_DATE ')) "monitor.audit saída \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d A saída é apenas a linha comentada # Uso da memória # Verifique a disponibilidade # Disk Monitor # Load Monitor # Uso da memória # Verifique a disponibilidade O arquivo monitor.audit dados \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d 04/05/2008-12: 16 r: 45304/05/2008-12: 16:: 77 04/05/2008-12: 16:: 138 # Load Monitor 04/05/2008-12: 16 ra: 0.3904/05/2008-12: 16:: 9,01 04/05/2008-12: 16:: 0,39 # Uso da memória 04/05/2008-12: 16 raprd01: 1304/05/2008-12: 16:: 18 04/05/2008-12: 16:: 18 # Verifique a disponibilidade 04/05/2008-12: 32 ra: 45304/05/2008-12: 32:: 77 04/05/2008-12: 32:: 138 # Load Monitor \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u0 Você pode por favor, diga o que eu preciso fazer Obrigado Arsidh |
|
||||
|
Oi Pessoal,
Agora tem algum outro problema com Perl script. A solução que é dada é funcionando perfeitamente, se as datas estão no mesmo month.If i dar datas como esta exportação FROM_DATE \u003d 04/05/2008 exportação TO_DATE \u003d 02/06/2008 perl -ne 'print if ($ _> \u003d "' $ FROM_DATE '" & & $ _ <\u003d "' $ TO_DATE '")' monitor.audit> $ FINAL_DATA Então não há nada que vem no arquivo de log. monitor.audit \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d 06/05/2008-10: 24: orasdfprd01: BANCO DE DADOS: gecolfdsafprd: 1 06/05/2008-10: 24: cisdsfsdmarsp010: BANCO DE DADOS: mafdsrp: 1 06/05/2008-10: 24: sdfsdacismarsfp011: BANCO DE DADOS: dxfdslp: 1 06/05/2008-10: 24: alpfdscisfdfspdb053: BANCO DE DADOS: mbdsfsop: 1 12/05/2008-10: 24: cisfsdfmasdfdsfrsp020: APPLCATION: 1 12/05/2008-10: 24: cisdsfdsfmarsp021: APPLCATION: 1 12/05/2008-10: 24: alpcsdfdsfispapp054: DESCUBRA: 0 12/05/2008-10: 24: alpcsdfdsispapp055: DESCUBRA: 1 12/05/2008-10: 39: orapsdafdsafrd01: DISCO: 456 12/05/2008-10: 39: cismdsafsdaarsp010: DISCO: 77 12/05/2008-10: 39: cisfsdafdsamarsp011: DISCO: 138 20/05/2008-10: 39: cismsdafsdaarsp020: DISCO: 28 20/05/2008-10: 39: cismfsdfsdarsp021: DISCO: 28 20/05/2008-10: 39: alpcsdfdsispapp054: DISCO: 190 20/05/2008-10: 39: alpcifasfsdaspapp055: DISCO: 190 20/05/2008-10: 39: alpcfsdafsdaispdb053: DISCO: 309 02/06/2008-10: 39: orasdfdsprd01: LOAD: 1.05 02/06/2008-10: 39: cisdsfdsmarsp010: CARGA: 2,86 02/06/2008-10: 39: cissdafdsmarsp011: LOAD: 0.43 02/06/2008-10: 39: cismasadfsdrsp020: CARGA: 0,12 02/06/2008-10: 39: cismarsdfdssp021: CARGA: 0,08 02/06/2008-10: 39: alpcisdsfdsapapp054: CARGA: 0,44 \u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d Por favor, qualquer um pode sugerir a este respeito. |
|
||||
|
Você deve estar ciente, porém, que Perl's <\u003d e > \u003d operadores simplesmente fazer comparações numéricas. Em outras palavras, o script não irá funcionar sem qualquer modificação, por exemplo através de um mês fronteira. A solução consiste em analisar a data cordas, e utilizar as matérias-primas resultantes números para comparação.
Opa, você já reparou. Enfim, o Google para a data em análise Perl. Também talvez ler a hora e data manipulação roscas nas FAQs para estes fóruns. |
![]() |
| Marcadores |
| Tags |
| exportação, Perl |
| Thread Tools | Pesquisar este Thread |
| Display Modes | Esta taxa Thread |
|
|