Help for this page
my $pass = <STDIN>; ... print $fh "$userñ$pass"; close($fh);
my $user = <STDIN>; ... print "NO MATCH"; }