ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/i-scream/misc/mailinfo/mailinfo.pl
(Generate patch)

Comparing misc/mailinfo/mailinfo.pl (file contents):
Revision 1.5 by tdb, Tue Jul 31 14:49:47 2001 UTC vs.
Revision 1.7 by tdb, Sun Aug 1 10:39:51 2004 UTC

# Line 6 | Line 6
6   # A perl script that mimmicks the behaviour of the UKC
7   # mailinfo client. Supports all functions except the -C
8   # option to change mailstore.
9 < #  - T.D.Bishop@ukc.ac.uk
9 > #  - T.D.Bishop@kent.ac.uk
10   #
11   # $Author$
12   # $Id$
# Line 107 | Line 107 | sub mailinfo() {
107      
108      # send the query
109      print $sock "$mode $name\n";
110 +    $response = "";
111      
112      # read and print the response    
113      while($response ne ".\n") {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines