Opps, forgot to mention that the line: $delete=0 if /^To.*?linux/i; Must be altered. Replace the linux part with any string that occurs in your email address. eg if you address is abc123@yahoo.co.nz you should replace linux with abc123 ie. $delete=0 if /^To.*?abc123/i; My bad, Cheers Paul