my @names = ('tom','bob','joe');
$names[1] = 'sam';