сцепить два файла по общему полю

[vasilisc]

Помогите плиз решить задачку на языках доступных в Ubuntu
есть два файла
первый файл

Код: [Выделить]

аккаунт:ФИО
ivanoff:Ivanoff II
второй файл

Код: [Выделить]

емайл:аккаунт
ivanoff@firma.ru:ivanoff
нужно сцепить инфу из обоих файлов, чтобы в третьем файле была инфа из первых двух, но в одном месте.
порядок полей не важен и возможен повтор полей

Код: [Выделить]

емайл:аккаунт:ФИО
ivanoff@firma.ru:ivanoff:Ivanoff II

просто влом всё закачивать в SQL и там джойнить
охота решить такую задачку проще - так как часто требуется ... время не жмёт =)
всем спасибо за сломанную голову

(Нажмите, чтобы показать/скрыть)

есть команда
paste -d " " 1.txt 2.txt > 3.txt
НО она клеит строки по типу   строка 1 файл 1 = строка 1 файл 2

[Yurror]

что-то типа?

Код: [Выделить]

#!/usr/bin/perl

use strict;

my %joined_data = ();

open F_IN1, $ARGV[0] || die "can't open file \"".$ARGV[0]."\"\n";
foreach my $line (<F_IN1>) {
    chomp $line;
    next if $line eq "";
    my ($acc, $name) = split(/\:/, $line);
    if (defined $acc) {
if (not defined $joined_data{$acc}) {
    $joined_data{$acc} = {};
}
$joined_data{$acc}->{name} = $name;
    }
}
close F_IN1;

open F_IN2, $ARGV[1] || die "can't open file \"".$ARGV[1]."\"\n";
foreach my $line (<F_IN2>) {
    chomp $line;
    next if $line eq "";
    my ($email, $acc) = split(/\:/, $line);
    if (defined $acc) {
if (not defined $joined_data{$acc}) {
    $joined_data{$acc} = {};
}
$joined_data{$acc}->{email} = $email;
    }
}
close F_IN2;

foreach my $acc (keys %joined_data) {
    print $joined_data{$acc}->{email}, ":", $acc, ":", $joined_data{$acc}->{name}, "\n";
}
идея понятна. нужные поля сможешь добавить.
объём обрабатываемых данных ограничен размерами ОЗУ так что аккуратнее.

[andrey_p]

Попробуй:

Код: [Выделить]

join -t: -12 -21  <(tail -n+2 FILE2 | sort) <(tail -n+2 FILE1|sort)Если есть несовпадающие строки, то надо добавить -е'строка замещающая отсутсвующее поле' к join.

[vasilisc]

Попробуй:

Код: [Выделить]

join -t: -12 -21  <(tail -n+2 FILE2 | sort) <(tail -n+2 FILE1|sort)Если есть несовпадающие строки, то надо добавить -е'строка замещающая отсутсвующее поле' к join.

спасибо огромное
стыдно, что не поискал man -k join и не нашёл сам
век - живи, век - учись
спасибо