Please indicate which writer has an episode star score greater than 5 in 2009.
writer refers to role = 'writer'; star score greater than 5 refers to stars > 5; in 2009 refers to year = 2009
SELECT T1.person FROM Award AS T1 INNER JOIN Episode AS T2 ON T1.episode_id = T2.episode_id WHERE SUBSTR(T1.year, 1, 4) = '2009' AND T1.role = 'writer' AND T2.votes > 5;