sub get_active_sheet { my $workbook = shift; return $workbook->{ActiveSheet}; }