$sort_routine = ( $opt_g =~ /^t/i
        ? \&sort_by_title
        : \&sort_by_date
    );