it-swarm-eu.dev

Jak tisknout pouze poslední sloupec?

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

jak mohu udělat nějaké "MAGIC" dostat tento výstup ?:

three
six
nine

UPDATE: Nepotřebuji to tímto specifickým způsobem, potřebuji obecné řešení, takže bez ohledu na to, kolik sloupců je v řadě, např .: awk vždy zobrazuje poslední sloupec.

27
LanceBaynes

Lze to dokonce provést pouze pomocí 'bash', bez 'sed', 'awk' nebo '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
6
jfg956

Snaž se:

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

Je to snazší, než si myslíte.

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

Zkuste grep (kratší/jednodušší, ale 3x pomalejší než awk kvůli použití regexu):

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

Nebo ex (ještě pomalejší, ale po dokončení vytiskne celou vyrovnávací paměť, což je užitečné, když je třeba třídit nebo upravovat na místě):

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

Chcete-li změnit místo, nahraďte -sc'%p|q!' s -scwq.

Nebo bash:

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

Výkon

Vzhledem k vygenerovanému souboru 1 GB prostřednictvím:

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

Provedl jsem statistiku analýzy času (běžel ~ 3x a vzal nejnižší, testováno na MBP OS X):

  • pomocí awk:

    $ time awk '{print $NF}' datafile > /dev/null
    real    0m12.124s
    user    0m10.704s
    sys 0m0.709s
    
  • pomocí 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
    
  • pomocí Perl:

    $ time Perl -lane 'print $F[-1]' datafile > /dev/null
    real    0m48.292s
    user    0m47.601s
    sys 0m0.396s
    
  • pomocí 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
    
  • pomocí 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
    
  • pomocí bash:

    $ time while read line; do arr=($line); echo ${arr[-1]}; done < datafile > /dev/null
    real    9m42.807s
    user    8m12.553s
    sys 1m1.955s
    
12
kenorb
... | Perl -lane 'print $F[-1]'
6
glenn jackman

Lze to také provést pomocí 'sed':

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

Aktualizace:

nebo jednoduše:

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

Nebo pomocí cut :

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

to však nesplňuje požadavek „obecného řešení“. Pomocí rev dvakrát to můžeme také vyřešit:

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

Pomocí awk můžete nejprve zkontrolovat, zda existuje alespoň jeden sloupec.

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

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

V Perlu to lze provést následovně:

#!/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";

výstup:

$ Perl last.pl
5
$

Můžete také procházet souborem, tady je příklad skriptu, který jsem napsal, abych analyzoval soubor nazvaný budget.dat

ukázková data v budget.dat:

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

(vidíte, že jsem potřeboval zachytit pouze sloupec „poslední“, nikoli pouze sloupec 2)

Scénář:

#!/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";
1
urbansumo