Select Code to Download

use warnings;
use strict;
...
}
open(my $twitter_list_file, '>', get_data($directory,"twitter_lists.tx
+t") or die $file_die;
print $twitter_list_file join("\n",@twitter_list_file_lines);

use warnings;
use strict;
...
    }
  }
}