modify some perl script file
modify hoh1.pl t2.pl split.pl