Як надрукувати лише останній стовпець?

echo -e 'one two three\nfour five six\nseven eight nine'
one two three
four five six
seven eight nine

як я можу зробити якийсь "MAGIC" отримати цей вихід?

three
six
nine

ОНОВЛЕННЯ: Мені це не потрібно саме таким чином, мені потрібно загальне рішення, так що незалежно від кількості стовпців підряд, наприклад: awk завжди відображає останній стовпець.

Він навіть може бути зроблено тільки з 'bash', без 'sed', 'awk'або 'perl':

echo -e 'one two three\nfour five six\nseven eight nine' |
  while IFS=" " read -r -a line; do
    nb=${#line[@]}
    echo ${line[$((nb - 1))]}
  done

Спробуйте:

echo -e 'one two three\nfour five six\nseven eight nine' | awk '{print $NF}'

Це простіше, ніж ти думаєш.

$ echo one two three | awk '{print $NF}'
three

Спробуйте grep(коротше / простіше, але в 3 рази повільніше, ніж awkчерез використання регулярних виразів):

grep -o '\S\+$' <(echo -e '... seven eight nine')

Або ex(ще повільніше, але він друкує весь буфер після закінчення, більш корисний, коли його потрібно буде сортувати чи відредагувати на місці):

ex -s +'%s/^.*\s//g' -c'%p|q!' <(echo -e '... seven eight nine')
ex +'%norm $Bd0' -sc'%p|q!' infile

^{Щоб змінити місце, замініть -sc'%p|q!'на -scwq.}

Або bash:

while read line; do arr=($line); echo ${arr[-1]}; done < someinput

Продуктивність

З огляду на згенерований 1 ГБ файл через:

$ hexdump -C /dev/urandom | rev | head -c1G | pv > datafile

Я виконував статистику розбору часу (пробіг ~ 3 рази і взяв найнижчий рівень, перевірений на MBP OS X):

• використовуючи awk:

  $ time awk '{print $NF}' datafile > /dev/null
  real    0m12.124s
  user    0m10.704s
  sys 0m0.709s

• використовуючи grep:

  $ time grep -o '\S\+$' datafile > /dev/null
  real    0m36.731s
  user    0m36.244s
  sys 0m0.401s
  
  $ time grep -o '\S*$' datafile > /dev/null
  real    0m40.865s
  user    0m39.756s
  sys 0m0.415s

• використовуючи perl:

  $ time perl -lane 'print $F[-1]' datafile > /dev/null
  real    0m48.292s
  user    0m47.601s
  sys 0m0.396s

• за допомогою rev+ cut:

  $ time (rev|cut -d' ' -f1|rev) < datafile > /dev/null
  $ time rev datafile | cut -d' ' -f1 | rev > /dev/null
  real    1m10.342s
  user    1m19.940s
  sys 0m1.263s

• використовуючи ex:

  $ time ex +'%norm $Bd0_' -sc'%p|q!' datafile > /dev/null
  real    3m47.332s
  user    3m42.037s
  sys 0m2.617s
  $ time ex +'%norm $Bd0' -sc'%p|q!' datafile > /dev/null
  real    4m1.527s
  user    3m44.219s
  sys 0m6.164s
  $ time ex +'%s/^.*\s//g' -sc'%p|q!' datafile > /dev/null
  real    4m16.717s
  user    4m5.334s
  sys 0m5.076s

• використовуючи bash:

  $ time while read line; do arr=($line); echo ${arr[-1]}; done < datafile > /dev/null
  real    9m42.807s
  user    8m12.553s
  sys 1m1.955s

... | perl -lane 'print $F[-1]'

Це також можна зробити за допомогою 'sed':

echo -e 'one two three\nfour five six\nseven eight nine' | sed -e 's/^.* \([^ ]*\)$/\1/'

Оновлення:

або простіше:

echo -e 'one two three\nfour five six\nseven eight nine' | sed -e 's/^.* //'

Або використовуючи cut:

echo -e 'one two three\nfour five six\nseven eight nine' | cut -f 3 -d' '

хоча це не відповідає вимозі "загального рішення". Використовуючи revдвічі, ми можемо вирішити і це:

echo -e 'one two three\nfour five six\nseven eight nine' | rev | cut -f 1 -d' ' | rev

Використовуючи awkви можете спочатку перевірити, чи є хоча б один стовпець.

echo | awk '{if (NF >= 1) print $NF}'

echo 1 2 3 | awk '{if (NF >= 1) print $NF}'

У перлі це можна зробити так:

#!/usr/bin/perl

#create a line of arbitrary data
$line = "1 2 3 4 5";

# splt the line into an array (we call the array 'array', for lolz)
@array = split(' ', $line);

# print the last element in the array, followed by a newline character;
print "$array[-1]\n";

вихід:

$ perl last.pl
5
$

Ви також можете проглядати файл, ось приклад сценарію, який я написав для розбору файлу під назвою budget.dat

Приклад даних у budget.dat:

Rent              500
Food              250
Car               300
Tax               100
Car Tax           120
Mag Subscription  15

(ви можете бачити, що мені потрібно було фіксувати лише "останній" стовпчик, а не лише стовпець 2)

Сценарій:

#!/usr/bin/perl
$budgetfile = "budget.dat";
open($bf, $budgetfile)
        or die "Could not open filename: $filename $!";


print "-" x 50, "\n";
while ( $row = <$bf> ) {
        chomp $row;
        @r = split (' ', $row);
        print "$row ";
        $subtotal += $r[-1];
        print "\t$subtotal\n";
}
print "-" x 50, "\n";
print "\t\t\t Total:\t$subtotal\n\n";