view release on metacpan or  search on metacpan

script/nup  view on Meta::CPAN

    [   line-style | ls :>up_opts # line style        ]=
    [     colormap | cm :>up_opts # color mapping     ]=
    [  page-number |              # page number       ]=1
    [  white-board |     >up_opts # black on white    ]=
    [  black-board |     >up_opts # white on black    ]=
    [  green-board |     >up_opts # white on green    ]=
    [  slate-board |     >up_opts # white on slate    ]=
)

##############################################################################
# Option callbacks
##############################################################################

# -h callback: show help from POD
help() {
    sed -E \
        -e '/^$/N' \
        -e 's/^(\n*)=head[0-9]* */\1/' \
        -e '/^\n*[#=]/d' \
        -e '/Version/q' \
        <<< "$pod"