#!/usr/bin/perl

my @interests = ( "foo", "bar", "blah" );
foreach (@interests) {
 $$_ = "My interest is $_";
}


foreach (@interests) {
        print $$_ , "\n";
}

exit;