Select Code to Download

#
# Start Update existing user
...
print "\nPlease input your next Option ( -u,-d,-h,-q )  --> : ";
chomp ($option = <>);
}

file1.dat; user id found, password updated
file2.dat; user id not found, password not updated.