This has been done with the following perl one-liner:
,---
perl -p -i -E 'if (m/->table\("([^"]*)"\)/) { $table = $1 };\
if (m/^=head1 COMPON/) { print "=head1 DESCRIPTION\n\n\
This module is a schema class for the NGCP database table \"$table\".\n\n" };'
`---
Change-Id: I030d073754f6622f66c8169c1a0cf4187462052e
This has been injected with a sed script of the following form:
,--- pod.sed ---
$a\
=head1 AUTHOR\
…\
=head1 LICENSE\
…
`---
Change-Id: I09bee06296199d2b2db7bd1bfbf50dc174ed90f2
These are the low hanging fruits: the syntax-bending imports are of little value
for this (mostly) generated code. Also remove dbicdump adminitions and checksums
because since 548f367acf the schema cannot be
merge-dumped anymore.
Guillem Jover
Irina Peshinskaya
Andreas Granig
Lars Dieckow