open(INFILE, "<", "infos.txt") or die ("cannot open input: $!"); my @infos = ; chomp(@infos);