print "Your unique ID is: $pw\n" if $_ eq $usedpw;