Perl: add support for hexchat_event_attrs

Short demo: https://dl.dropboxusercontent.com/s/06o6r8zobacoroe/attrs.pl
Won't this get skipped because of the early return above (XSRETURN_IV) ?