@names = ('peter','jonah','larry'); 
 foreach (@names) {
    $$_ = "i like $_";
 }

 print "$peter \n $jonah \n $larry \n";