pod sub alias

alias.zsh

pod_subs () {
    awk '
        BEGIN  { print "=over 4\n" }
        /sub / { printf "=item C<%s()>\n\n", $2 }
        END    { print "=back" }
    ' $1
}

$ pod_subs FleurOrderUpdateEmail.pm 
=over 4

=item C<send>

=item C<_set_request_stage>

=item C<_add_bundle_note>

=item C<_write_html_to_tmp>

=item C<_add_account_note>

=item C<_broadband_and_wlr_components_are_approved>

=item C<_get_expected_date_from_zephyr_update>

=item C<_debug>

=item C<_build_logger>

=item C<_build_template_args>

=item C<_build_order_info_date>

=item C<_build_product_name>

=item C<_build_parsed_status>

=item C<_build_template>

=item C<_build_request_bundle>

=item C<_build_broadband_component>

=item C<_build_wlr3_component>

=item C<_build_calls_component>

=item C<_build_contact_address>

=back