test add one file
perl scripts