proper error message for usage of 'do...for'

https://rt.perl.org/rt3/Ticket/Display.html?id=102652
Merge pull request #87 from FROGGS/patch-3

proper error message for usage of 'do...for'