Position de carcteres

Je pense que le caractère "espace" ne t'interresse pas ?

Donc si les lignes sont décalées par des espaces ou tabulations :

cat fichier | expand | while read i
do
# longueur de la ligne complète
Lfull=$(echo "$i" | wc -c)
# longueur de la ligne sans les espaces en début de ligne
Lshort=$(echo "$i" | sed "s/^ *//g")
echo $(($Lfull - $Lshort))
done

ça devrait marcher ça non ?
Je ne l'ai pas testé.

A+
pmx

Salut,

pmx => Pour que ton script fonctionne, il faudrait d'abord initialiser la variable "IFS" à rien(IFS=), puis compléter ta ligne :
" Lshort=$(echo "$i" | sed "s/^ *//g")"
avec :
" Lshort=$(echo "$i" | sed "s/^ *//g") | wc -c".... ce qui donnerait :

#/bin/bash

OIFS=$IFS; IFS=
cat plop | expand | while read i
do
# longueur de la ligne complète
Lfull=$(echo "$i" | wc -c)
# longueur de la ligne sans les espaces en début de ligne
Lshort=$(echo "$i" | sed "s/^ *//g" | wc -c)
echo $(($Lfull - $Lshort))
done 
IFS=$OIFS

;-))

Sinon dr971 => essaie ça :

#!/bin/bash

IFS=$'\n'
for line in $(cat plop)
do
pos=$(echo -e "$line" | expand | sed 's/\(^[  ]*\).*/\1/'| wc -c)
echo -e "Position = $pos"
done

Salut,

la position de 1er caractère je suppose qu'est en fonctions d'un caractère de la famille espace (espace, tabulation).

on compte la tabulation en tant qu'un caractère ou on doit la convertir en espace?
et si on doit la convertir en espace, alors combien d'espaces pour une tabulation (si je ne me trompe pas c'est 8 par défaut)?

Et voilà ce que ça donne

pas d'espace

echo "a sdjfkl" | perl -ne '/^(\s+)(?=\S)/;print length($1),"\n"'
0

2 espaces

echo "  a sdjfkl" | perl -ne '/^(\s+)(?=\S)/;print length($1),"\n"'
2

une tabulation

echo -e "\ta sdjfkl" | perl -ne '/^(\s+)(?=\S)/;print length($1),"\n"'
1

merci à tous pour votre aide. Mon programme fonctionne parfaitement