Select Code to Download

@list = <PASSF>;

my $User_Entry = <PASSF>;
my @list = split(/ /, $User_Entry);
.
.
.

use strict;
use warnings;