Select Code to Download

foreach (@names) {
  next if /^buckaduck$/i;
  ...
}

foreach (@names) {
  next if ( lc($_) eq lc('buckaduck') );
  ...
}