Perl script for translating a header (.h) file to a source file (.c)