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