Discussion :

[cjlhe]

Bonjour,

Je recherche à scanner un programme et à recuperer des informations de ce programme :

Exemple :

data wrk.A;
set wrk.B (where=(TOTO='1' and TITI='1');
run;

data wrk.C;
set wrk.D (where=(TATA='1');
run;

Je voudrais recupérer un fichier contenant ce qui se trouve entre l'espace et ='1'.
Ici je devrais avoir TOTO , TITI , TATA

Merci

[Delwyn]

Un truc rapide pour te débloquer :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#!/bin/ksh
 
FICHIER=fic_entre.txt
TOCKEN==\'1\'
 
echo recherche de ${TOCKEN} dans le fichier ${FICHIER}
 
for MOT in $(grep ${TOCKEN} ${FICHIER} | tr -s "\(" "\n" | tr -s "\)" "\n")
do	
	RESULTAT=$(echo $MOT | grep ${TOCKEN} | tr -cd "[A-Z][a-z]{=,',1}" )	
	if [[ $RESULTAT != "" ]] then
		echo "$RESULTAT" | cut -d"=" -f1
	fi	
done
 
echo "fin"

Oui je sais c'est un peu crade