|
gWuBi无疑是当前最优秀的五笔输入法,不过还有些功能有待改善,比如输入法当前还不能向五笔加加那样输入特殊符号。我做了个小小的perl脚本程序,可以向词库里加入自己的设定词组,自然包括那些特殊符号,程序代码如下:
addck.pl
----------------------------------------------
#! /usr/bin/perl
$file1=@ARGV[0]||die "there is no file1";
$file2=@ARGV[1]||die "there is no file2";
open fh,$file1;
@contents1=<fh>;
close fh;
open fh,$file2;
@contents2=<fh>;
close fh;
$number1=@contents1;
$number2=@contents2;
while($i<$number1||$j<$number2){
if($i==$number1){print "@contents2[$j]";$j++;}
if($j==$number2){print "@contents1[$i]";$i++;}
else{
if(@contents1[$i] lt @contents2[$j]){print "@contents1[$i]";$i++;}
if(@contents1[$i] gt @contents2[$j]){print "@contents2[$j]";$j++;}
if(@contents1[$i] eq @contents2[$j]){print "@contents1[$i]";$i++;$j++;}
}
}
-------------------------------
用法:perl addck.pl wbx.mb cktoadd.txt >wbxnew.mb
其中cktoadd.txt为新造词组,其形式与wbx.mb同 |
|