On Fri, Apr 05, 2002 at 10:38:52PM +0200, Sven Guckes wrote: > if the sources are strict about this then > the script should be quite trivial. anyone?
without any debugging, this seems to work. no attempt has been made to
make this readable though.
perl -lne 'next unless /,\s+DT_/ or /^\s*\*\*/; next if /DT_SYN/;print "\n$1: (default
$2)" and next if /{ "([^"]+)".*, (.*)\}/;chomp;s/^\s*\*\*//;s/\.pp$//;s/\\f.//g;
s/\.d.//g;print' init.h|more
:)
--
Dan Boger
[EMAIL PROTECTED]
msg26804/pgp00000.pgp
Description: PGP signature
