To help nudge you in the right direction, but not straight out give you a solution, look to the following two items:
1) store a reference to the From header
from = msg:getHeader("From")
2) check if the the from number is in the from
if string.find(from, "2001")