用Perl干工作，陕西西安、咸阳并网，吉林延吉、通化，珲春、梅河口并网，修改异地手机寻址数据。

各地区号
西安29，咸阳910，延吉433，通化435，珲春440，梅河口448
需要将h码表文件hlrtranslate.unl中类似
...
86|130|0844|910|
86|130|2908|440|
86|131|5972|448|
...
的数据替换为
86|130|0844|910|
86|130|2908|440|
86|131|5972|448|

编写a.pl
while (<>) {
if (s//|910/|/s$/|29|/) {print;}
elsif (s//|440/|/s$/|433|/) {print;}
elsif (s//|448/|/s$/|435|/) {print;}
else {print;}
}

然后
cat hlrtranslate.unl | perl a.pl > h.txt
就得到修改后的文件，加载，定时启用，完成。