[~] perl -e 'use GetWord;$a=Get_Word();print"$a\n";'
Enter command > abc

your command was abc

[~] perl -e 'use GetWord;$a=Get_Word();print"$a\n";'
Enter command > o<tab>
->auto generated->one

[~] perl -e 'use GetWord;$a=Get_Word();print"$a\n";'
Enter command > tw<tab>
->auto generated->two