Вопрос : проверите если потребитель существует в хэше -, то будут мной делая неправильно?

Hi

I сделало этим быстро сценарии для того чтобы проверить если потребители в архиве нагружены в hash.

this будут архивом:, то (
quintus
renee
usera
userb

and архива txt) это будет сценарий:

$capfile = «курс, котор нужно хранить»;

мое $x = 0;
раскрывает (после того как я ПОКРЫНЫ, $capfile) || умрите «не смогите открытый архив $capfile: $! »;
пока (мо $line = ) {
$caplist {$line} = $x;
      $x ++ ;

} закрывает (ПОКРЫНО);

if (существует $caplist {«renee»}) {печать
«поистине»;


Why
} будет я не получая «поистине»?
class=

Ответ : проверите если потребитель существует в хэше -, то будут мной делая неправильно?

Вы не извлекаете отставая конец характеров линии \ n от вашего входного файла вы кладете в $line поэтому «renee» не существует в вашем хэше но «renee \ n» о.

Вы можете chomp входной сигнал от вашего архива текста освободить это вверх как внизу должно сделать выходку.

  пока (мо $line = ) {
      chomp $line;
      $caplist {$line} = $x;
      $x ++;
   }