☰

Присвоить имена, хранящиеся в файле, номерам, хранящимся во втором файле

tag-icon • tag-icon bash shell-script scripting
Присвоить имена, хранящиеся в файле, номерам, хранящимся во втором файле

У меня есть два файла:

>head(fileA)
   2    1   544.8  1279.2   1.0603  3.2460  0.0542 
   3    1   546.2  1277.8   1.0463  3.2460  0.0553 
   3    2   543.9  1280.1   0.1652  3.2460  0.0177 
   4    1   543.7  1280.3   1.0819  3.2460  0.0527 
>head(fileB)
1 Coly
2 Mony
3 Fong
4 Wow
5 Poly

Я хотел бы присвоить имена в файле B числу в файле A, чтобы получить следующий вывод

   2 Mony   1 Coly   544.8  1279.2   1.0603  3.2460  0.0542 
   3 Fong   1 Coly  546.2  1277.8   1.0463  3.2460  0.0553 
   3 Fong   2 Mony  543.9  1280.1   0.1652  3.2460  0.0177 
   4 Wow    1 Coly   543.7  1280.3   1.0819  3.2460  0.0527

Честно говоря, я не смог ничего попробовать, я просто потратил много времени на поиски того, как это сделать. Единственное, что я подумал, это присвоить числа в fileA переменным, а затем каждый раз, когда эти переменные будут найдены, добавлять к ним содержимое fileB. К сожалению, я не знаю, как это сделать.

Есть предложения, ссылки, указания? Спасибо

решение1

Вы можете использовать bash read, grep и tr:

cat fileA | while read i j k ; do
  grep "^$i\W" fileB | tr '\n' ' '
  grep "^$j\W" fileB | tr '\n' ' ' 
  echo $k 
done

решение2

Perl спешит на помощь!

#! /usr/bin/perl
use warnings;
use strict;

open my $B, '<', 'B' or die $!;
my %name_of;
while (<$B>) {
    my ($num, $name) = split;
    $name_of{$num} = $name;
}

open my $A, '<', 'A' or die $!;
while (<$A>) {
    my @F = split;
    splice @F, 2, 0, $name_of{ $F[1] };
    splice @F, 1, 0, $name_of{ $F[0] };
    print "@F\n";
}

Второй абзац считывает файл B в хэш-таблицу, сопоставляя числа с именами. Третий абзац считывает файл A, разбивает каждую строку на массив, вставляет в массив имена, извлеченные из хэш-таблицы в соответствии с первыми двумя столбцами, и печатает его.

Связанный контент