Re: TECHWR-L Digest?

[John_Payne -at- HP-BOISE-OM2 -dot- OM -dot- HP -dot- COM]

Marguerite,

The LISTSERV protocol defines an INFO option that allows you to get
copies of the documentation available for LISTSERV. Try sending the
following message to the administrator of this group
(LISTSERV -at- VM1 -dot- UCC -dot- OKSTATE -dot- EDU):

    INFO REFCARD

This typically returns a copy of the LISTSERV Quick Reference card,
which I have found to be very helpful. If this doesn't work, you might
try sending an INFO message without any parameters, which should return
a list of the available documentation files.

Good luck.

John Payne
john_payne -at- hp-boise-om2 -dot- om -dot- hp -dot- com
----------


.......................................................................

Item Subject: WINMAIL.DAT
Could not convert UNKNOWN FILE-TYPE (1734) item to text.
Will attempt to 'shar' item as file '01obu9o' at end of msg.


# This is a shell archive.  Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file".

# Wrapped by HP OpenMail System <openmail -at- hpbs4813> on Wed Feb 22 10:07:09 1995

# This archive contains:
#       01obu9o

# Error checking via wc(1) will be performed.

LANG=""; export LANG
PATH=/bin:/usr/bin:$PATH; export PATH


rm -f /tmp/uud$$
(echo "begin 666 /tmp/uud$$\n#;VL*n#6% -at- x\n \nend" | uudecode) >/dev/null 2>&1
if [ X"`cat /tmp/uud$$ 2>&1`" = Xok ]
then
        unpacker=uudecode
else
        echo Compiling unpacker for non-ascii files
        pwd=`pwd`; cd /tmp
        cat >unpack$$.c <<'EOF'
#include <stdio.h>
#define C (*p++ - ' ' & 077)
main()

        int n;
        char buf[128], *p, a,b;

        scanf("begin %o ", &n);
        gets(buf);

        if (freopen(buf, "w", stdout) == NULL) {
                perror(buf);
                exit(1);
        }

        while (gets(p=buf) && (n=C)) {
                while (n>0) {
                        a = C;
                        if (n-- > 0) putchar(a << 2 | (b=C) >> 4);
                        if (n-- > 0) putchar(b << 4 | (a=C) >> 2);
                        if (n-- > 0) putchar(a << 6 | C);
                }
        }
        exit(0);

EOF
        cc -o unpack$$ unpack$$.c
        rm unpack$$.c
        cd $pwd
        unpacker=/tmp/unpack$$
fi
rm -f /tmp/uud$$

echo x - 01obu9o '[non-ascii]'
$unpacker <<'@eof'
begin 660 01obu9o
M>)\^(@   0N  0 H    ,3DY-3 R,C(Q,C0P+D%!,#4V-S0V.#,X*&$I<F5LX
,87DN:' N8V]M #8*                                            X
                                                             X
end
@eof
set `wc -lwc <01obu9o`
if test $1$2$3 != 1157
then
        echo ERROR: wc results of 01obu9o are $* should be 1 1 57
fi

chmod 660 01obu9o

rm -f /tmp/unpack$$
exit 0