uumerge.pl

Kai-Uwe Rommel rommel at lan.informatik.tu-muenchen.dbp.de
Mon Jul 9 22:20:52 AEST 1990


And this is my version for awk. It does not require all parts to be in
separate files, the parts may be concatenated to one single file.

Kai Uwe Rommel
Munich
rommel at lan.informatik.tu-muenchen.dbp.de

------------------------

#!/bin/awk -f

BEGIN {
  body = 0;
}

/^[ ]*$/ || /[a-z]/ {
  body = 0;
}

/^begin/ {
  body = 1;
}

/^M/ && !/[a-z]/ && length($0)>60 {
  body = 1;
}

/^end/ {
  print $0 | "uudecode -";
  body = 0;
}

{
  if ( body )
    print $0 | "uudecode -";
}

-----------------



More information about the Alt.sources mailing list