Separate names with a comma.
Изучай алгоритмы, язык вторичен.
Запятую забыл после PH! open (PH, "customer.txt") || die "Ошибка при открытии файла $!";