Help for this page
s/_string$// for @list;
my @list = ...; my @newList = @list; s/_string$// for @newList;