for my $text ( qw( one two three four five six seven eight nine ten ) )
{
  my $uniq_text = $text; # Copy
  ... # Your code, where $uniq_text is a new variable that was never used before, and noone else has access to.
}