my @array = qw(a b c d);
my $temp_string = join ',' , @array;
my @new_array = split ',' , $temp_string;