Discussion :

[ventures]

Bonjour aux cracks :

J'essaie par une commande unix d'insérer dans un fichier texte sur la première ligne, à partir de la colonne 55 , un texte fixe et une variable d'un total de 8 caractères. Et le tout sans décaler le texte existant du fichier.

Exemple: texte à insérer 'CA' , variable &Date = '062010'

J'ai essayé avec la commande sed mais ne sais pas comment écrire la syntaxe pour positionner en colonne 55 de la première ligne.

Avez-vous une solution ?

[ventures]

Pour simplifier , car apparemment il n'y a pas à ma connaissance d'amateur de commande Unix pour localiser les colonnes d'un fichier texte (ASCII), j'ai pu par un programme cobol inscrire en dur sur la première ligne en colonne 55 les caractères suivants : CAµµµµµ

Maintenant, dans un script shell, par une commande Unix, il ne reste plus qu'à substituer 'µµµµµ' par la valeur date &date (MMSSAA).

Et le souci et comment substituer une variable

La commande sed : sed "s/µµµµµ/(/_$date)"
ne passe pas

Ni TR : tr "µµµµµ" $date

Qlq'un aurait-il une meilleure interprétation ?

[letis]

Je ne suis pas sûr d'avoir tout compris avec le passage par le cobol, mais ceci peut peut-être aider :

Code :

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

1
2
3
 
export var=$(date +%Y-%m-%d)
cat ./fichier_de_data | awk '{print substr($0,1,55)ENVIRON["var"]substr($0,56)}'

Dans l'exemple ci-dessus, chaque ligne du fichier fichier_de_data est envoyé à awk, qui retourne, en les concaténant :
- les caractères 1 à 55 inclus;
- le contenu de la variable d'environnement var
- les caractères 56 et suivants de la ligne.

Note : il faut faire obligatoirement un export de var pour que awk puisse y accéder.

[kalwin]

Tiens cela pourrait être aussi une solution en travaillant sur la première ligne comme vous l'avez dit :



UN=$(head -1 MON_FICHIER | awk '{ for (i=1;i<=55;i++) printf ("%s ", $i )}' )

VAR=$(date +%Y-%m-%d)

DEUX=$(head -1 MON_FICHIER | awk '{ for (i=56;i<=NF;i++) printf ("%s ", $i )}' )

echo $UN $VAR $DEUX

voilà a toi de voir

Cordialement

[ventures]

Merci
Enfin , j'avais procédé autrement avec la commande Sed, tout bête, mais ridicule, car je remplace des blancs par un texte.

Alors votre solution avec un SUBTR n'est pas mal.

Sur mon fichier texte, je veux en colonne 55 insérer un texte 'TOTO' , sans la valeur date pour tester la commande, donc :

cat ./FICHIER | awk '{print substr($0,1,55) "TOTO"}' > FICTEST

mais message d'erreur sur la commande CAT :
cat: 0652-050 Cannot open ./FICHIER

La commande écrite comme cela ne passe pas.

Avez-vous la bonne syntaxe ?

[letis]

hmmm dans le cas présent, ./FICHIER n'existe pas

- soit il n'existe vraiment pas à l'emplacement spécifié
- ou alors il a des caractères invisibles dans son nom.

[ventures]

Si, si, le fichier existe bien.
la commande CAT ne doit probablement pas commencer comme ça...Je suis sous Unix Aix....?

[ventures]

Oui ça fonctionne maintenant, il fallait enlever le './' :

cat /FICHIER.....

Mais le fichier résultant FICTEST affiche bien 'TOTO' à la 55e colonne, mais a supprimé tout ce qui suit après laz 59e colonne .

Il manque qlq chose après le AWK....

[letis]

Oui ça fonctionne maintenant, il fallait enlever le './' :

cat /FICHIER.....

Mais le fichier résultant FICTEST affiche bien 'TOTO' à la 55e colonne, mais a supprimé tout ce qui suit après laz 59e colonne .

Il manque qlq chose après le AWK....

Il faut rajouter un substr pour lui dire d'afficher le reste de la ligne ...

soit :

cat /FICHIER | awk '{print substr($0,1,55)"TOTO"substr($0,56)}'

[ventures]

OK, c'est mieux
Mais cette fois-ci , ça a décalé la suite de 4 espaces après "TOTO" à partir de la 59e colonne, car l'écriture de 'TOTO' est en insertion de 4 colonnes.

Il y a surement un moyen d'insérer sans décaler les colonnes...(?)