my @arr = qw( bob sue jane);
print "\@arr = " . join(':', @arr) . "\n";