
bradleyb
Deleted
Feb 26, 2000, 8:21 PM
Post #1 of 2
(9032 views)
|
Accessing an FTP Service via PERL
|
Can't Post
|
|
I need to access an FTP server within a PERL program and have written the following which does open up a connection to the FTP service but doesn't sent the SITE EXEC command like I would hope it would but instead just drops connections because the program ends. use CGI; use Win32::Internet; $INET = new Win32::Internet(); $INET->FTP($FTP, "aaa.bbb.ccc.ddd", "user-id", "password"); print "Content-type: text/html\n\n"; print "<HTML>\n"; print "<HEAD>\n"; print "<TITLE>CRIS - Telephone Control Service v0.001a 991022</TITLE>\n"; print "</HEAD>\n"; print $FTP "quote site exec test dial 213-5295.bat\n";
|