Як я можу друкувати рядки з файлу назад (без використання "tac")?

Я хочу надрукувати рядки з файлу назад, не використовуючи tacкоманди. Чи є якесь інше рішення зробити таку справу з басом?

Використання 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

У перл:

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