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: I030d073754f6622f66c8169c1a0cf4187462052echanges/50/16650/3
parent
34ab96b569
commit
354976a4d6
Loading…
Reference in new issue