Select Code to Download

open (DB, "<".$codes_db) || die ("Can't open $codes_db");
...
push(@buffer, $_) unless ($_ eq $code); }
close (DB) || die ("Can't close $codes_db");