$_ =~ s/\s+//;
    my @Elements  = split /\s/;
[download]

You are first removing all white space from the input, and then try to split on white space???? This doesn't make sense to me.