Select Code to Download

#!/usr/bin/perl 
use warnings;
...
        push @final, $url$code; # append the two and push it into @fin
+al
    }
}