#!/usr/local/bin/perl
#
# convert formatted short form word file to MAK's commands file 
#
# create : 95.7.26 (Wed), bgjang@csone
# modify :
#

open(EEE, ">eee") || die "cannot open eee\n";

while(<STDIN>) {
    /^([^ \n]*) : ([^ \n]*)/;
    print EEE "ID $1 $2\n";
}

close(EEE);
