Assuming that each variable is a string containing no commas, you could do this:

 
@string = split(',',$string);
$newstring = join(',',@string[0..$#string-20]);
[download]

I'm assuming that $string contains all the variables concatenate together as in: