add missing semicolon (very recent perl verisoning fail here)