eitf='L:\data\eit\0218\lz\2003\02\efz20030218.011343'

read_eit, eitf, eindex, edata

eit_prep, eindex, data=edata, oeindex, oedata

安装sswdb之前: # ln -s /usr/bin/perl /usr/local/bin/perl