ユーザの作成のためにフラットファイルに対してユーザ名入力を確認する問題

Question

私はユーザログインを行っていますが、ユーザ作成パートに問題があります。私の問題は、入力ユーザー名をテキストファイルと照合して、そのユーザー名が既に存在するかどうかを確認しようとしていることです。私はそれが私が持っている配列に入力ユーザー名を比較することができないようです。私はこれを達成するための2つの異なる方法を試してみました。 1つは配列を使用し、もう1つはオンラインで私がかなり理解していないものを使用しています。どんな助けや説明も大歓迎です。ここで

はここ http://codepad.org/G7xmsf3z

のオフを比較するために、配列を使用して私の試みで、あなたの最初の試みで、私の第二の試み http://codepad.org/SbeqmdbG

Answer 1

で、もしループの内側に配置しよう：

：

foreach my $pair(@incomingarray) { 
    (my $name,my $value) = split (/:/, $pair); 

    if ($name eq $username) { 
     print p("Username is already taken, try again"); 
     close(YYY); 
     print end_html(); 
    } 
    else { 
     open(YYY, ">>password.txt"); 
     print YYY $username.":".$hashpass."\n"; 
     print p("Your account has been created sucessfully"); 
    close(YYY); 
    print end_html(); 
    } 
} 

はあなたの第二の試みで、私はあなたがしようとすると行を変更すべきだと思いますこの1と

if (%users eq $username) { 

：私のコメントのように

if (defined $users{$username}) { 

Answer 2

、あなたのユーザー情報を保持するためにフラットファイルを使用するべきではありません。あなたは、あなた自身のすべてを処理する方法を理解し、コード化する必要がなく、あなたのための同時アクセスを処理する適切なデータベースを使用する必要があります。

あなたは、配列を使う、という場合は、grepを（）、それは「大きすぎ」でない場合に、それを検索することができます。

if (grep /^$username:/, @incomingarray) { 
    print "user name '$username' is already registered, try again\n"; 
} 
else { 
    print "user name '$username' is not already registered\n"; 
} 

は、私は同様にあなたのコード内のいくつかの他の問題を参照してください。

パッケージ（私たちの）変数よりもレキシカル（my）変数を優先するべきです。 なぜ$ nameと$ usernameは字句変数にできない（間違って）と思いますか？

open（）の3-arg形式を使用し、2番目のコード例のように戻り値をチェックする必要があります。最初のコード例のopen（）は、何年も前にどのように行われたかです。

Answer 3

フラットファイルを他のプロセスからロックすることについて上述したように、スケーリングにも問題があります。ルックアップが遅くなるユーザーが増えます。

私は何年も前からフラットファイルを使っていましたが、実際のデータベースを必要とするほどの規模ではなく、たとえばmySQLの使い方を習得したくないと思いました。最終的にフラットファイルの破損と長い検索時間の後、私はデータベースに移動する以外に選択肢がありませんでした。

ユーザーの設定などを保存したい場合は、新しいフィールドをデータベースに簡単に追加できます。フラットファイルは各ラインを別々のフィールドに分割するオーバーヘッドを伴います。

私はあなたがデータベースで適切に行うことをお勧めします。