Create wcinperl.pl