use warnings; use strict; my @interests = ( "foo", "bar", "blah" ); $_ = "My interest is $_" for @interests; print $_,"\n" for @interests;