Discussion :

[olivier1969]

Bonjour à tous ,

Comme dit dans le titre je cherche à supprimer des caractères "pourris" situés en début de chaine de caractère , celle-ci ci doivent commencer par 2018 ;

voici un panel de lignes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
ÿÿÿÿMD  2018/11/06 18:07:49|MET|58|1|2018/11/06 18:31:14|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008568872009|89
2018/11/06 18:10:14|59|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|00
Í%ÿÿÿÿMD  2018/11/06 18:10:30|1|1|2|0|25|7|0|0|2018/11/07 18:32:14||2|-1|518554|597776|2907|3007|0|cf
&ÿÿÿÿMD  2018/11/06 18:15:30|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000085688
42018/11/06 18:24:26|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008828
IÿÿÿÿMD  2018/11/06 18:25:17|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|cf
F2018/11/06 18:30:57|1|2|0|25|7|0|0|||2|-1|518554|597776|29|1|2|0|25|7|0|0|||2|-1|518554|597776|29
wL^ÿÿÿÿMD  2018/11/06 18:31:14|1|2|0|25|7|0|0||2018/11/06 18:31:14|2|-1|518554|597776|29
n2018/11/06 18:45:34|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|cf
AQRH2018/11/06 19:17:23|1|2|0|25|7|0|0|||2|-1|518554|597776|297|0|0|0

J'ai essayé plusieurs regex par substitution , mais rien ne marche ... (évidement une date peut se retrouver ailleurs dans la chaine )

Merci pour votre aide

A+

[Flodelarab]

Bonjour

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

awk -F'2018' '{OFS=FS;$1="";} 1' fichier

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sed 's@[0-9]\{4\}/[0-9][0-9]/[0-9][0-9]@\n&@;s@.*\n@@' fichier

[Lolo78]

Comme c'est la rubrique Perl de ce forum, une solution en Perl:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
s/.+?2018/2018/;  # remplace tous les caractères du début de la chaîne jusqu'à 2018 (inclus) par 2018

Exemple d'utilisation à la ligne de commande:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
$ echo 'ÿÿÿÿMD  2018/11/06 18:07:49|MET|58|1|2018/11/06 18:31:14|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008568872009|89
> 2018/11/06 18:10:14|59|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|00
> Í%ÿÿÿÿMD  2018/11/06 18:10:30|1|1|2|0|25|7|0|0|2018/11/07 18:32:14||2|-1|518554|597776|2907|3007|0|cf
> &ÿÿÿÿMD  2018/11/06 18:15:30|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000085688
> 42018/11/06 18:24:26|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000088
> ' | perl -pe 's/.+?2018/2018/;
> '
2018/11/06 18:07:49|MET|58|1|2018/11/06 18:31:14|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008568872009|89
2018/11/06 18:10:14|59|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|00
2018/11/06 18:10:30|1|1|2|0|25|7|0|0|2018/11/07 18:32:14||2|-1|518554|597776|2907|3007|0|cf
2018/11/06 18:15:30|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000085688
2018/11/06 18:24:26|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000088

[olivier1969]

Comme c'est la rubrique Perl de ce forum, une solution en Perl:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
s/.+?2018/2018/;  # remplace tous les caractères du début de la chaîne jusqu'à 2018 (inclus) par 2018

si seulement cela avait été aussi simple , une des nombreuses tentatives que j'ai testé , mais ça ne marche pas , ces p... de caractères se sont insérés à la place d'un retour chariot , c'est certainement un pb d'encodage caractère mais rien n'y fait.

A force de tourner en rond , j'ai fait un split /2018/ de la chaine de caractère , et chose bizarre , quand je veux afficher la première valeur de la table c'est vide ???

Mais au moins en faisant comme ça je peux récupérer ce dont j'ai besoin

Ceci dit , si quelqu'un a une autre solution ou explication , je suis preneur ...

[Lolo78]

Bonjour,

la solution idéale serait certainement de résoudre le problème d'encodage. Mais là, impossible de t'aider, tu ne donnes pas assez d'informations sur tes données en entrée.

Si supprimer les caractères précédant la chaîne 2018 ne fonctionne pas dans tous les cas, tu peux choisir une stratégie inverse: ne garder que les caractères suivant la chaîne 2018 (et n'imprimer le résultat que si la chaîne 2018 a été trouvée). Par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
$ echo 'ÿÿÿÿMD  2018/11/06 18:07:49|MET|58|1|2018/11/06 18:31:14|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008
568872009|89
> 2018/11/06 18:10:14|59|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|00
> Í%ÿÿÿÿMD  2018/11/06 18:10:30|1|1|2|0|25|7|0|0|2018/11/07 18:32:14||2|-1|518554|597776|2907|3007|0|cf
> &ÿÿÿÿMD  2018/11/06 18:15:30|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000085688
> 42018/11/06 18:24:26|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000088
> '  |  perl -ne 'print "$1\n" if /(2018.+$)/;
> '
2018/11/06 18:07:49|MET|58|1|2018/11/06 18:31:14|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#00008568872009|89
2018/11/06 18:10:14|59|1|1|2|0|25|7|0|0|||2|-1|518554|597776|2907|3007|0|00
2018/11/06 18:10:30|1|1|2|0|25|7|0|0|2018/11/07 18:32:14||2|-1|518554|597776|2907|3007|0|cf
2018/11/06 18:15:30|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000085688
2018/11/06 18:24:26|MET|58|1|1|1|0|25|6|0|0|#BSLIL656#DSCAN117!10!atm!1/46:8.35#000088

[olivier1969]

Bonjour,

la solution idéale serait certainement de résoudre le problème d'encodage. Mais là, impossible de t'aider, tu ne donnes pas assez d'informations sur tes données en entrée.

Malheureusement , comme les fichiers sont reçus par CFT , je ne sais pas quel est le type d'encodage !!

> ' | perl -ne 'print "$1\n" if /(2018.+$)/;
> '

Déjà essayé aussi , mais ça ne vire pas les caractères ....