In attempting to convert a batch FTP script from unix to Mac, I have run into a problem. I think I'm doing everything right, but I get AppleEvent timeouts. It's supposed to take a partial file location like: gui/glidel-38.hqx or [Archived as /info-mac/gui/glidel-38.hqx; 36K] and get it from the Info-Mac mirror in $base (hard coded for now). I run the script, Anarchie launches, and the download starts, but the script stops because of a # OS error -1712 (Error message file not available) File 'The Tick:Desktop Folder:batchFTP.pl'; Line 19 Which MacOS Errors lists as "AppleEvent Manager-the AppleEvent timed out". Am I doing something wrong here? This is my first attempt at a MacPerl-specific script, although I've written several large scripts under Unix Perl. batchFTP.pl: #!perl use Mac::Apps::Anarchie; $ftp = new Mac::Apps::Anarchie; # change to droplet soon, so I can drop the file of items to get open (DL, "The Tick:Desktop Folder:dl") or die "no dl"; open (DLNEW, ">The Tick:Desktop Folder:dlnew") or die "no dlnew"; chdir "The Tick:Desktop Folder:"; $base = "ftp://mirrors.apple.com/mirrors/info-mac/"; $basedest = "Arthur:Desktop Folder:Stuff: fetchstuff:"; for $file (<DL>) { $file =~ s/\; .*K\]//; $file =~ s/\[Archived as \/info-mac\///; @path = split /\//,$file; $macfile = $file; $macfile =~ s/\//:/g; print "ftp $path[$#path]"; $ftp->geturl("$base$file", "$basedest$macfile"); unless (-e "Arthur:Desktop Folder:$path[$#path]") { print DLNEW "$file"; print "$path[$#path] not downloaded...\n"; print "$error"; } } close DLNEW; close DL; unlink "The Tick:Desktop Folder:dl"; rename "The Tick:Desktop Folder:dlnew", "The Tick:Desktop Folder:dl"; Dan Bongert | Hire the Morally Handicapped--It's More Fun! dbongert@students.wisc.edu | National Institute for the Morally Handicapped herkimer@upl.cs.wisc.edu | http://www.upl.cs.wisc.edu/~herkimer ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch