if ( $subname eq 'do_zipped_things' )...