[comp.databases] Automatic Subscribing Listservers..

smahabal@uceng.UC.EDU (Sudhir Mahableshwarkar) (06/28/91)

I just wrote a script to subcribe database listservers. If any
one is tired of sending mail one by one, this should do.

Just delete those addresses which are not of your interest.

Sudhir
--
--remove every thing above and including this line ---
--remove this line and save the addresses below in 'temp.xxx' in current dir--
ADR-L@ALBNYVM1.BITNET    ADR Database Products Discussion List
CLIPPER@BRUFPB.BITNET    List for Clipper and DBMS systems for IBM PC
DBASE-L@NMSUVM1.BITNET   Discussion on the use of the dBase language
DB2-L@AUVM.BITNET        DB2 Data Base Discussion List
FOCUS-L@ASUACAD.BITNET   FOCUS mailing list
IDMS-L@UGA.BITNET        Cullinet IDMS Discussion
INGRES-L@HDETUD1.BITNET  Discussion on the RDBMS INGRES
L-ORACLE@UQAM.BITNET     Usagers Oracle/Oracle's Users
MSSQL-L@DUKEVM.BITNET    Microsoft SQL Server Discussion List
M204-L@AKRONVM.BITNET    Model 204 Database Discussion List
OHEUG-L@UMDD.BITNET      ORACLE Higher Education Users Group
ORACLE-L@SBCCVM.BITNET   ORACLE database mailing list.
PARADOX@BRUFPB.BITNET    List for Borland Paradox users
SIR-L@UREGINA1.BITNET    SIR/DBMS(r) Software Discussion List
SPIRES-L@BITNIC.BITNET   SPIRES Conference List
SQL-L@FINHUTC.BITNET     SQL discussion list
SQL-L@MITVMA.BITNET      SQL Info Exchange
SQLINFO@UICVM.BITNET     Forum for SQL/DS and Related Topics
--- above line is end of 'temp.xxx' file. --
--- Remove this line and delete all above this line ---
#!/bin/sh
#
#
#
if [ $# -ne 2 ] 
then
 echo Usage: $0 First_Name Last_Name
 exit 0
fi
echo "----------------------------------------------"
echo  Sending mails for $1 $2
echo "----------------------------------------------"
name=some 
adrs=some_adrs
j=1
awk '{print $1 }' temp.xxx > temp2.xxx
for i in `cat temp2.xxx`
do
 name=`echo $i | awk -F@ '{ print $1 }'`
 adrs=`echo $i | awk -F@ '{ print $2 }'`
 echo SUB $name $1 $2 > temp3.xxx
 echo SET $name REPRO NOACK >> temp3.xxx
 echo $j ')' Sending Mail to LISTSERV of $adrs
 mail LISTSERV@$adrs < temp3.xxx &

 if [ $j -eq 8 ]
 then
  echo Waiting to finish some of forked processes
  echo sleeping for 20 seconds
  sleep 20
 fi

 j=`expr $j + 1`
 rm -f temp3.xxx 
done
echo Job Done
rm -f temp2.xxx
exit 0

-- 
-------------------------------------------------------------------------------
Sudhir Mahableshwarkar    (____)        Sudhir@UC.EDU XXXXXXXXXXXXXXXXXXXXXXXXX
2920 Scioto Str, #611      (oo)         smahabal@uceng.uc.edu XXXXXXXXXXXXXXXXX
Cincinnati, OH 45219        )(          .. and hope for bright sun tomorrow ...