#!/bin/sh
# Extract the substitution commands from the ASCII file resulting from
# a makenroff -PN | nroff run.

echo "#!/usr/local/bin/perl"
echo "while (<STDIN>) {"
grep "!|" $*
echo "print STDOUT ;"
echo "}"
