[Megoldva] 2 fájl tartalmának "összevegyítése" 1 fájlba

Haaaat, ilyen beepitet parancsrol nem tudok, viszont ezt barmely programnyelven viszonylag egyszeruen meg lehet oldani.

Azert merulnek fel kerdesek: mi legyen, ha a ket file nem egyforma hosszu? mekkorak a file-ok (ha nagyok, akkor celszeru valami buffert kialakitani)? soronkent vagy bajtonkent (esetleg maskepp: ketsoronkent?) kell-e "osszevegyiteni"?

/sza2

Ha a ke't file

a.dat

e's

b.dat

:

awk -v f=b.dat '{ print; if ( n%2 ) { getline < f; print; getline < f; print; } n++; }' a.dat

filea="filea.txt"
fileb="fileb.txt"

nlines=`cat "$filea"|wc -l`

lineno=0

while [ $nlines -ge $lineno ]
do
tail "$filea" -n +$lineno | head -n2>>outputfile
tail "$fileb" -n +$lineno | head -n2>>outputfile
lineno=$(($lineno+2))
done

Nye! Tesztelve, muxik, johet a csoki!

Nem szép megoldás, inkább csak érdekességképp:

#!/bin/bash

exec 5< a
exec 6< b

while read Line <&5
do
echo $Line
read Line <&5
echo $Line
read Line <&6
echo $Line
read Line <&6
echo $Line
done

exec 5>&-
exec 6>&-

Ha egyesével akarod összefésülni, akkor egy "funkcionális" (nem imperatív) megoldás (kettőnél több file-ra is), GNU utility-kkel:

for F in F1 F2 ... Fn; do
  cat --number -- "$F"
done \
| sort --stable --key=1,1n \
| cut --fields=2-

Én is hozzáteszem a magamét, azzal együtt, hogy biztos, hogy a fenti exec-es dolgot használnám. Sajnos ezzel az innen is kettő, onnan is kettő kitétellel eléggé megnehezítetted a dolgot :)

mkfifo 1 2
paste -d X - - < a.txt > 1 &
paste -d X - - < b.txt > 2 &
paste -d X 1 2 | tr X '\n'
rm 1 2

nem szép, de lagalább más, mint az eddigiek. Persze vannak előfeltételek a kódban (pl. a bejövő adatokban ne legyen X, illetve a -d opcióban megadott karaktert úgy kell megválasztani, hogy azzal ne legyen gáz - mondjuk sima szövegfájlnál pl. lapdobás-jel nem nagyon lenne.)

$ paste a.dat b.dat | sed '$!N;s/\n/\t/' | awk 'BEGIN{OFS="\n"} {print $1, $3, $2, $4}'

A valtozatossag kedveert itt egy megoldas perlben, tetszoleges szamu soronkent fesul, tetszoleges szamu file-t, az se zavarja, ha nem egyforma hosszuak a file-ok, vagy valamelyik file-ban a sorok szama nem oszthato n-nel. Nem ugraltatja foloslegesen a diszket, es nem olvassa be a teljes file-okat memoriaba. A hianyzo sorok helyett '<<after-eof>>'-ot printel.

Igy kell hasznalni:

$ comb -n <LINES> FILE1 [FILE2 [FILE3 ...]]

#! /usr/bin/perl

use strict;
use warnings;

use Getopt::Std;
getopts( 'n:', \my %opt );
my $lines_at_once = $opt{n} // 1;

my @file_refs;
for (@ARGV) {
  my $file_ref = { NAME => $_, FH => undef, EOF => 0 };
  open $file_ref->{FH}, '<', $file_ref->{NAME}
    or die "open '$file_ref->{NAME}': $!";
  push @file_refs, $file_ref;
}

while ( grep { not $_->{EOF} } @file_refs ) {
  last if ( @file_refs == grep { eof $_->{FH} } @file_refs );
  for (@file_refs) {
    my $n  = 0;
    my $fh = $_->{FH};
    while ( $n++ < $lines_at_once ) {
      my $line = <$fh>;
      if ( not defined $line ) {
        $_->{EOF} = 1;
        $line = '<<after-eof>>' . $/;
      }
      print $line;
    }
  }
}

__END__

cat file1.text file2.text |sort -un > file3.text
(bár nem teszteltem)

Kisse unatkoztam, ugyhogy itt van meg egy lehetoseg, azok kedveert, akik ertekelik az ilyet.

Regebben, amikor meg nem ismertem semmilyen epkezlab programozasi nyelvet, az ilyesmi feladatokat tipikusan vi makrokkal oldottam meg. No para, meglepoen egyszeru.

Eloszor generaljunk ket tesztfile-t:

$ for i in $(seq 0 9); do echo a$i >> testa.txt ; echo b$i >> testb.txt ; done

Inditsunk egy vi-t (konkretan nvi-t, mert kisebb valtoztatasokkal ugyan megoldhato vim-ben is, de ott valamiert fajdalmasan lassu).

$ nvi testa.txt

Miutan fut a vi, nyissuk meg osztott ablakban a masik file-t is:

:E testb.txt<CR>

Az ablakok kozott ^w (control+w)-vel valthatunk, valtsunk is vissza az elso ablakra. (A kurzor mindket ablakban az elso sor elso karakteren all.)

Probaljuk ki eloszor, mit csinalnank, hogy az elso ket sort atmasoljuk az elso ablakbol a masodikba:

d2d # ket sort torol es a paste bufferbe tesz
^w # valt a masik ablakba
P # paste-eli a buffer tartalmat az aktualis sor fole
4j # a kurzort oda viszem, ahol a kovetkezo 'P' kovetkezne
^w # vissza az elso ablakba

Ez eddig jo, de ugye nem akarjuk kezzel csinalni? ;-)

Allitsuk vissza a ket file eredeti tartalmat

:e!<CR>

(mindket ablakban), majd irjunk egy rekurziv makrot az elozoekbol:

:map g d2d^wP4j^wg<CR>

Arra ugyeljunk mikozben a fenti makrot visszuk be, hogy bizonyos parancsokat (^w, ^c, ^v, escape) escape-elni kell ^v (control+v)-vel, vagyis egy ^w-t igy vigyunk be: ^v^w.

Minden elkeszult, alljunk az elso file elso sorara a kurzorral, majd futassuk a friss makronkat (nyomjuk meg a 'g'-t).

Ta-daam.

Mar csak el kell mentenunk a masodik ablak tartalmat:

:w out.txt<CR>

Aztan lepjunk ki az ablakokbol mentes nelkul:

:q!<CR>

(ketszer)

Ez a leiras kisse hosszadalmas lett ugyan, de a vi makrok erosen write-onlyk, szoval ha csak a makrot irtam volna le, senki nem ertene, mit is csinal. Valojaban viszont nincs benne semmi bonyolult, csak ismerni kell a vi parancsokat. Es ha lehetek kisse nagyvonalu, hogy nem szamolom az elokeszuleteket, akkor a kod hossza magasan veri az osszes tobbi megoldast.