bonjour,
voici mon probleme je dois retrouver dans un fichier log, certaine ligne
voici ma ligne perle :
cat /app/RIP/zguerlais.babar | perl -ne 'print $1, "\n" if (/DIFETAT-ID BURCAP/../2358/) && /YCA3\s+(.*)/' > /app/RIP/prod/data/CAPTUR_TESTS_AERO/rcdepcon/ccom$j1.log
et voici le resultat :
*DIFETAT-ID BURCAP
*** CAPTURE DATE 260507180205 ****
CAPAU0
1 TST101 000000000001
DIRECTORY TAPE IS BON052
LIST OF BONNOT'S FOR CAPTURE
SEQ NO REEL
1 BON052
END OF CAPTURE YCAP
[B]*DIFETAT-ID BURCAP
*** CAPTURE DATE 260507180205 ****
CAPAU0
1 TST101 000000000001
DIRECTORY TAPE IS BON052
LIST OF BONNOT'S FOR CAPTURE
SEQ NO REEL
1 BON052
END OF CAPTURE YCAP
********************************************************
YCA3-YCPDIR volser 007805 service on R40K unit 0
R40Ku0/007805 non-cprssed byte xfered to initiator 240
R40Ku0/007805 bytes read from tape 288
R40Ku0/007805 non-cprssed byte xfered from initiator 23472
R40Ku0/007805 bytes written on tape 2112
R40Ku0/007805 blocks succesfully read by host 4
R40Ku0/007805 blocks succesfully written by host 13
R40Ku0/007805 blocks succesfully read from tape 2
R40Ku0/007805 blocks succesfully written on tape 7
YCA3-YCPDIR volser 007805 on R40K unit 0 free done
YCA3 : DIRECTORY TAPE IS 007805
YCA3 : LISTING PRINTED
*************************************************
*DIFETAT-ID BURCAP
*** CAPTURE DATE 260507211145 ****
CAPAU0
1 TST102 000000000001
DIRECTORY TAPE IS 007805
LIST OF BONNOT'S FOR CAPTURE
SEQ NO REEL
1 BN2871
2 BN1676
3 BN0017
4 BN2883
END OF CAPTURE YCAP
*DIFETAT-ID BURCAP
*** CAPTURE DATE 260507211145 ****
CAPAU0
1 TST102 000000000001
DIRECTORY TAPE IS 007805
LIST OF BONNOT'S FOR CAPTURE
SEQ NO REEL
1 BN2871
2 BN1676
3 BN0017
4 BN2883
END OF CAPTURE YCAP
je voudrais ne plus avoir les lignes du fichier ci dessus qui sont entre les deux lignes d'astériques
merci pour votre aide
ps je ne connait rien en perle
Partager