colcmp( $worksheet, ... ); sub colcmp { my( $worksheet, ... }