Removing old files from user in create user perl script.