open($Definedlist, '<', $name) or die "Open failed on $name: $!"; # opens the file and places the contents into Namelist open($BigNamelist, '<', $newName) or die "Open failed on $name: $!"; # opens the second file and places the contents into Newlist