Как я могу напечатать строки из файла в обратном направлении (без использования «TAC»)?

Я хочу напечатать строки из файла в обратном направлении без использования tacкоманды. Есть ли другое решение, чтобы сделать такую ​​вещь с Bash?

Использование sedдля эмуляции tac:

sed '1!G;h;$!d' ${inputfile}

С ed:

ed -s infile <<IN
g/^/m0
,p
q
IN

Если вы на BSD/ OSX(и , надеюсь , в ближайшее время на GNU/ linuxтоже , как это будет POSIX ):

tail -r infile

awk '{a[i++]=$0} END {for (j=i-1; j>=0;) print a[j--] }' file.txt

через awk один лайнер

Как вы просили сделать это в bash, вот решение, которое не использует awk, sed или perl, а только функцию bash:

reverse ()
{
    local line
    if IFS= read -r line
    then
        reverse
        printf '%s\n' "$line"
    fi
}

Выход из

echo 'a
b
c
d
' | reverse

является

d
c
b
a

Как и ожидалось.

Но имейте в виду, что строки хранятся в памяти, по одной строке в каждом рекурсивно вызванном экземпляре функции. Так осторожно с большими файлами.

Вы можете передать это через:

awk '{print NR" "$0}' | sort -k1 -n -r | sed 's/^[^ ]* //g'

Перед awkкаждой строкой ставится префикс номера строки, за которым следует пробел. sortИзменяет порядок строк при сортировке по первому полю (номер строки) в обратном порядке, числовой стиль. И sedполоски с номера строк.

Следующий пример показывает это в действии:

pax$ echo 'a
b
c
d
e
f
g
h
i
j
k
l' | awk '{print NR" "$0}' | sort -k1 -n -r | sed 's/^[^ ]* //g'

Это выводит:

l
k
j
i
h
g
f
e
d
c
b
a

В perl:

cat <somefile> | perl -e 'while(<>) { push @a, $_; } foreach (reverse(@a)) { print; }'

BASH-только решение

прочитать файл в массив bash (одна строка = один элемент массива) и распечатать массив в обратном порядке:

i=0 

while read line[$i] ; do
    i=$(($i+1))
done < FILE


for (( i=${#line[@]}-1 ; i>=0 ; i-- )) ; do
    echo ${line[$i]}
done

Bash, mapfileупомянутое в комментариях к fiximan, и, возможно, лучшая версия

# last [LINES=50]
_last_flush(){ BUF=("${BUF[@]:$(($1-LINES)):$1}"); } # flush the lines, can be slow.
last(){
  local LINES="${1:-10}" BUF
  ((LINES)) || return 2
  mapfile -C _last_flush -c $(( (LINES<5000) ? 5000 : LINES+5 )) BUF
  BUF=("${BUF[@]}") # Make sure the array subscripts make sence, can be slow.
  ((LINES="${#BUF[@]}" > LINES ? LINES : "${#BUF[@]}"))
  for ((i="${#BUF[@]}"; i>"${#BUF[@]}"-LINES; i--)); do echo -n "${BUF[i]}"; done
}

Его производительность в основном сопоставима с sedрешением и становится быстрее по мере уменьшения количества запрашиваемых строк.

Simple do this with your file to sort the data in reverse order, and it should be unique.

sed -n '1h; 1d; G; h; $ p'

• Пронумеруйте строки с помощью nl
• сортировать в обратном порядке по номеру
• убрать числа с помощью sed

как показано здесь:

echo 'e
> f
> a
> c
> ' | nl | sort -nr | sed -r 's/^ *[0-9]+\t//'

Результат:

c
a
f
e

awk '{print NR" "$0}' | sort -nr