sub close { my ($self) = @_; $self->{workbook}->close; }