bin/perldoc

Fri, 20 Sep 2019 00:43:39 -0500

author
Meredith Howard <mhoward@roomag.org>
date
Fri, 20 Sep 2019 00:43:39 -0500
changeset 790
5ecabaf00ed2
parent 774
d6a54f86ab10
permissions
-rwxr-xr-x

set rebase.autosquash

672
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
1 #!/bin/sh
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
2 set -eu
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
3
743
76c4c96d8b9f Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents: 672
diff changeset
4 if [ -t 1 ]; then
76c4c96d8b9f Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents: 672
diff changeset
5 export PERLDOC="-oterm ${PERLDOC:-}"
76c4c96d8b9f Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents: 672
diff changeset
6 fi
76c4c96d8b9f Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents: 672
diff changeset
7
672
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
8 if [ -x "$(command -v cpandoc)" ]; then
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
9 exec cpandoc $*
c6336b1897e9 add cpandoc
Meredith Howard <mhoward@roomag.org>
parents:
diff changeset
10 fi
774
d6a54f86ab10 Don't exec self
Meredith Howard <mhoward@roomag.org>
parents: 743
diff changeset
11
d6a54f86ab10 Don't exec self
Meredith Howard <mhoward@roomag.org>
parents: 743
diff changeset
12 BIN="$(which -a perldoc | grep -v $0 | head -n 1)"
d6a54f86ab10 Don't exec self
Meredith Howard <mhoward@roomag.org>
parents: 743
diff changeset
13 exec $BIN $*

mercurial