sort: % if ( $sort eq 'c' ) { count % } else { count % } value: % if ( $sort eq 'a' ) { ascending % } else { asceding % } % if ( $sort eq 'd' ) { desceding % } else { desceding % } % if ( $numeric && $sort =~ m/^[ad]$/ ) { numeric % } elsif ( $numeric ) { numeric % }