Select Code to Download

while (<CONF_ID>){
   my ($confID, $confPIN) = split ' ';
   next unless defined $confID;
   ...
}

while (<CONF_ID>){
   my ($confID, $confPIN) = split ' ';
   $confID = '' unless defined $confID;
   ...
}