On Mon, 19 Nov 2001, Jacob Haller <[log in to unmask]> wrote: >>Is there a command that returns all of the lists that a particular e-mail >>address has "Owner" privileges to? ... >I believe that the next version of LISTSERV is expected to have a >"LISTS OWNED BY email@address" command which would allow a site admin >to get the list of lists owned by a given address. However, that's >not implemented in 1.8d. In the interim, the following perl script might meet your needs. -- Paul Russell Senior System Administrator University of Notre Dame ----- 8< cut here >8 ----- #!/usr/local/bin/perl5 -w $count = @ARGV; if ( $count != 1 ) { print STDOUT "$0 cancelled - missing or invalid argument: @ARGV\n"; print STDOUT "Correct syntax: $0 listowner-email-address"; exit; } ($#ARGV < 0 ) and die "Usage: $0 <email-address-of-owner-to-find-in-lists>\n"; $home_dir="/usr/products/listserv/home"; chdir $home_dir; opendir(DIR,".") or die "Unable to open listserv directory: $!"; @files=grep (/.*\.list$/,readdir(DIR)); closedir(DIR); print "Searching for lists owned by $ARGV[0]\n"; foreach $filename ( @files ) { open (CUR,$filename) or die "Unable to open $home_dir/$filename\n"; while ( <CUR> ) { (/Owner=[^*]*$ARGV[0]/io) and print "$filename\n"; } close CUR; } exit; ----- 8< cut here >8 -----