Select Code to Download

my ($subdir, @keywords) = split;

my @array = split;
my ($subdir, @keywords) = @array;

my @array = split;
my $subdir   = $array[0];
my @keywords = @array[1..$#array];