Work with names.txt instead of names-sample.txt

This commit is contained in:
Petr Baudis 2014-10-13 19:17:22 +02:00
parent 8521ed8c6a
commit c31d035e1a
2 changed files with 9 additions and 3 deletions

View file

@ -7,7 +7,7 @@ use v5.10;
use CGI;
our @names;
open my $fh, "names-sample.txt" or die "$!";
open my $fh, "names.txt" or die "$!";
while (<$fh>) {
chomp;
push @names, $_;