When using an indirect object (like print and say do), you need to enclose the object expression in braces if it's not simple, e.g.

say {$self->{'log'}} 'Message';
[download]

Dave.