Position de carcteres

merci à tous pour votre aide. Mon programme fonctionne parfaitement

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

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)?

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

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