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

https://rt.perl.org/rt3/Ticket/Display.html?id=102652