Maleteen,
Here is some sample code for you.
WARNING: This is not working code. I thought it would be better to
give you a start to a program and and end and some options
for what you can do in the middle of the program.
HINT: I would put your username and password in another
file during the debug process or use command line arguments
to keep the password and username secret.
use strict;
use Net::FTP;
my $server = ARGV[0];
my $user = ARGV[1];
my $pass = ARGV[2];
# connect
my $ftp = Net::FTP -> new($server);
print $ftp -> message(), "\n";
# login
$ftp -> login("$user","$pass");
print $ftp -> message(), "\n";
# set binary mode
$ftp -> binary();
print $ftp -> message(), "\n";
# move through directories
# $dir = "ftp";
# $ftp -> cwd($dir);
# print $ftp -> message(), "\n";
# list files
my @list = $ftp -> ls();
print $ftp -> message(), "\n";
# put files on the server
$ftp -> put(local file, remote file);
print $ftp -> message(), "\n";
$ftp -> quit();
exit(0);
Ergowolf
Does code make a sound if no one is there to type it?
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|