open USRNF,">>$file" or die "Couldn't find user file $file, Perl says $!\n"; print USRNF join "#", @info; #Line 166 Error = "#" print USRNF "\n"; close USRNF; open PASS,">>$pass" or die "Coundn't find user file $pass, Perl says $!\n"; print PASS $user_name; print PASS "\\"; print PASS &encryption($password); print PASS "\n"; close PASS;