☰

純粋な強く打つ

tag-icon • tag-icon bash shell-script sort
純粋な強く打つ

私はBashスクリプトを学んでいますが、この問題で苦労しています。で複数の行が与えられたら、STDINまず長さに応じて昇順に並べ替えます。その後、同じ文字数を含む行がある場合、行に含まれる空白以外の文字数に基づいて昇順に並べ替えられます。

私はいくつかの異なるアプローチを試しましたが、通常はBashの珍しい特性に閉じ込められます。

これが私が今まで得たものです：

#!/bin/bash

sorted=()
while IFS='' read -r line; do
    length=${#line}
    if [[ ${sorted[$length]} == "" ]] ; then
        sorted[$length]="$line"
    else
        #non unique length
        #sorted[$length]="${sorted[$length]}\n$line"
        IFS=$'\n' arr=("${sorted[$length]}")
        arr+=("$line")

        spaces=()

        for ((i=0 ; i < ${#arr[@]} ; ++i )) ; do
            spaces[$i]=$(echo "${arr[$i]}" | sed "s: : \n:g" | grep -c " ")
        done

        arr_sorted=()

        for ((i =0 ; i < ${#spaces[@]} ; i++ )) ; do
                for ((j=0 ; j < ${#arr[@]} ; i++ )) ; do

                        this_line_length=$(echo "${arr[$j]}" | sed "s: : \n:g" | grep -c " ")
                        if [[ "$this_line_length" == "${spaces[$i]}" ]] ; then
                            arr_sorted+=("${arr[$j]}")
                            unset arr[$j]
                        fi
                done
        done


    sorted[$length]="${arr_sorted[@]}"


    fi
done

私はこれが最善のアプローチから離れていると推測します。 bashの組み込み機能にあまり依存せず、すべてを実装しようとしましたが、今は意味がないようです。

答え1

他の原則と同じ原則を使用します（空白文字の有無にかかわらず行の長さを取得し、整列してから削除します）awk。

awk '{NC = length(gensub(/[[:space:]]/, "", "g")); print length, NC, $0}' file |
  sort -nk1,2 |
  sed -r 's/^([0-9]+ ){2}//'

gensub(/[[:space:]]/, "", "g")行からすべての空白文字を削除すると、残りの文字列の長さが得られます。

コードブロックまでの質問テキストを使用し、幅は80文字に縮小されます。

$ awk '{NC = length(gensub(/[[:space:]]/, "", "g")); print length, NC, $0}' foo | sort -nk1,2 | sed -r 's/^([0-9]+ ){2}//'


 increasing order).
Here's what I've got so far:
f the idiosyncrasies of bash.
iven a bunch of lines from STDIN, sort them first by the length of the line in i
I've tried this a couple of different ways but I usually get caught up in some o
, sort them by the number of nonblank characters contained in the lines (also in
I am working on learning bash scripting but I am struggling with this problem. G
ncreasing order. Then, if there are any lines with the same number of characters

答え2

sort次のような悪意のある外部デバイスを使用することが許可されている場合cut：

#! /bin/bash
while IFS= read -r line; do
    squeezed=$( tr -d '[:blank:]' <<<"$line" )
    printf '%d\t%d\t%s\n' ${#line} ${#squeezed} "$line"
done | sort -n -k 1 -k 2 | cut -f 3-

編集する：誰もがそうするので、解決策は次のとおりですperl。

perl -e 'print sort { length $a <=> length $b || $a =~ y/ \t//c <=> $b =~ y/ \t//c } <>'

答え3

純粋な

入力が小さいほどフォークがないので、他の答えよりもはるかに高速です！

sortByLength () { 
    local -a sorted=() sort2
    local line sline sline2 pointer
    while IFS= read -r line; do
        sorted[${#line}]+="$line."
    done
    for pointer in ${!sorted[@]} ;do
        sort2=()
        line="${sorted[pointer]}"
        while [ "$line" ]; do
            sline=${line:0:pointer}
            line=${line:pointer+1}
            sline2=${sline//[[:blank:]]}
            sort2[${#sline2}]+=${sline}$'\n'
        done
        printf "%s" "${sort2[@]}"
    done
}

なぜなら、これは次のようなものです。宿題、これがどのように機能するかを説明します...

フォークは1つで十分です。

sortByLength () {
    perl -e '
        while(<>){
            chomp;
            push @a,$_;
        };
        map {
            printf "%s\n",${$_}[2];
        } sort {
            ${$a}[0]*1000+${$a}[1] <=> ${$b}[0]*1000+${$b}[1]
        }  map {
            my $s=$_;
            s/\s//g;
            [ length($s),length($_),$s ]
        } @a;
    '
}

答え4

機能：

sortlen() { while read x ; do \
              y=`tr -d '[:blank:]' <<< "$x"` ; echo ${#x} ${#y} "$x" ; \
            done | sort -k 1g,2 -k 2g,3 | cut -d' ' -f3-; }

テスト：

printf "a b c\nabcde\nabcdefg\na\nabcd\n" | sortlen

出力：

a
abcd
a b c
abcde
abcdefg

関連情報