$sref = \$string; foreach $string ( @array_of_strings ) { print $$sref; } #### $sref \$string1; foreach $string2 ( @array_of_strings ) { $string1 = $string2; print $$sref; }