for my $db_char ( @db_chars[0..14] ) {
 ...