<% sub spacer { my ($width, $height, $align) = @_; return ''; } %>