Quantos títulos há para o episódio escrito por Tom Scharpling?
CREATE TABLE table_25716401_1 (title VARCHAR, written_by VARCHAR)
SELECT COUNT(title) FROM table_25716401_1 WHERE written_by = "Tom Scharpling"