Help for this page
my $string = "millenium"; ... foreach my $char (@list) { print "$char\n"; }
m i ... i u m