salut Samy,

je serais heureux de lire si qq1 trouve la solution. toutefois je dois
avouer que pour ma part, j'ai contourné le pb lorsque sort m'a joué ce
genre de tours:

perl -F@ -lane '
        push @lines, [@F];
        END { map  { print join q(@), @$_ }
              sort { $$a[0] cmp $$b[0] }
              @lines }' <<\.
"a z"@t
"a b"@t
"a"@t
"ac"@t
.

me donne bien

"a b"@t
"a z"@t
"a"@t
"ac"@t

cordialement,
marc

Répondre à