$db =~ s/_.+?_/_${dbname}_/;