NBash

1
#!/bin/bash
2

3
# -w -- длина строки
4
# -h -- включить переносы
5

6
while getopts "hw:" opt; do
7
	case $opt in
8
		h ) hyph=1 ;;
9
		w ) width="$OPTARG" ;;
10
	esac
11
done
12
shift $(($OPTIND - 1))
13

14
nroff << EOF
15
.ll ${width:-72}
16
.na
17
.hy ${hyph:-0}
18
.pl 1
19
$(cat "$@")
20
EOF
21

22
exit 0