#!/usr/bin/perl

die unless( open TXT, "help.txt" );
die unless( open C, ">help.C" );

print C "static char *help_text = ";

while( <TXT> )
{
   chop;
   print C "\"$_\\n\"";
   print C ';' if ( eof TXT );
   print C "\n";
}

close TXT;
close C;

0;