Gossamer Forum: General: Perl Programming: How to do this.....

Oct 28, 2000, 4:45 AM

Andy

Veteran / Moderator (18441 posts)

Oct 28, 2000, 4:45 AM

Post #1 of 16

Shortcut

How to do this.....

Hi. I am the webmaster at http://ace.upyour.com (Ace Installer). I have been totally choc-a-block with installations recently (cos i offer them for free!), and i want to know if anyone could give me the code for how to do the following (so i can make a script that auto-chmods and uploadsd the files, which takes the longest time);

1) Login to a site
2) Upload files
3) CHMOD files

Yours

A.J.Newby
webmaster@youradds.com
http://ace.upyour.com

Oct 28, 2000, 9:06 AM

Stealth

Veteran (17240 posts)

Oct 28, 2000, 9:06 AM

Post #2 of 16

Shortcut

Re: How to do this..... In reply to

Use FileMan.

Regards,

Eliot Lee

Oct 29, 2000, 10:40 AM

Andy

Veteran / Moderator (18441 posts)

Oct 29, 2000, 10:40 AM

Post #3 of 16

Shortcut

Re: How to do this..... In reply to

Thanks for the suggestion; but what i want to do is have a script on my site (password protected, so only my installers can use it), and then let them upload the files and CHMOd them, then all they would need to do is set the variables in the scripts config. This is mainly for Links2, because it takes quite a long time to uplaod the files and then CHMOD them, but at Ethernet speeds it would be much quicker.

And ideas would be much appreciated.

A.J.Newby
http://ace.upyour.com

Oct 29, 2000, 7:51 PM

Mark Badolato

Veteran (1509 posts)

Oct 29, 2000, 7:51 PM

Post #4 of 16

Shortcut

Re: How to do this..... In reply to

And FileMan can't be used for that why?

Installation support is provided via ICQ at UIN# 53788453. I will only respond on that number.

Oct 30, 2000, 4:20 AM

Andy

Veteran / Moderator (18441 posts)

Oct 30, 2000, 4:20 AM

Post #5 of 16

Shortcut

Re: How to do this..... In reply to

The reason i don't want to use it is because it only works on the server you install it to, not from my server to another remote one. Do you have any other script suggestions that may do this for me?

Yours

A.J.Newby
webmaster@youradds.com
http://ace.upyour.com

Oct 30, 2000, 7:44 AM

Stealth

Veteran (17240 posts)

Oct 30, 2000, 7:44 AM

Post #6 of 16

Shortcut

Re: How to do this..... In reply to

Use Net::FTP to share data between different servers. Search http://www.perl.com or http://www.cpan.org for information on this module. OR search your perldocs in your server.

Regards,

Eliot Lee

Oct 30, 2000, 8:53 AM

Alex

Administrator (9387 posts)

Oct 30, 2000, 8:53 AM

Post #7 of 16

Shortcut

Re: How to do this..... In reply to

As AnthroRules said, Net::FTP is your best bet:

Code:

use Net::FTP;

$ftp = Net::FTP->new("some.host.name", Debug => 0);
$ftp->login("anonymous",'me@here.there');
$ftp->cwd("/pub");
$ftp->put("that.file");
$ftp->site("CHMOD 755 that.file");
$ftp->quit;

Cheers,

Alex

--
Gossamer Threads Inc.

Oct 31, 2000, 10:09 AM

Andy

Veteran / Moderator (18441 posts)

Oct 31, 2000, 10:09 AM

Post #8 of 16

Shortcut

Re: How to do this..... In reply to

Where can i get the module from?

Thanks

A.J.Newby
webmaster@youradds.com
http://ace.upyour.com

Oct 31, 2000, 10:24 AM

Bearwithme

User (119 posts)

Oct 31, 2000, 10:24 AM

Post #9 of 16

Shortcut

Re: How to do this..... In reply to

In Reply To:

Where can i get the module from?

Right here:
http://cpan.org/modules/index.html

easy does it

Nov 2, 2000, 4:37 AM

Andy

Veteran / Moderator (18441 posts)

Nov 2, 2000, 4:37 AM

Post #10 of 16

Shortcut

Re: How to do this..... In reply to

Thanks. That code worked. Just one more question, how do i delete files? Would i put
$ftp->dele("test.file");
or something else?

Thanks for the support so far.

Yours
A.J.Newby
webmaster@youradds.com
http://ace.upyour.com

Nov 4, 2000, 3:25 AM

Andy

Veteran / Moderator (18441 posts)

Nov 4, 2000, 3:25 AM

Post #11 of 16

Shortcut

Re: How to do this..... In reply to

Hi. Thanks for the support earlier. I was just wondering if you could tell me how to make a directory using the code you gave me. I have worked out how the use 'cdup' and 'cwd', but the 'mkd' doesn't seem to work. I have used the following code;
$ftp->mkd("links");
but it doesn't work!

Also, is it possible to upload whole folders? And if so how can i do this?

Any help would be much appreciated.

Yours

A.J.Newby
webmaster@youradds.com
http://ace.upyour.com

Nov 6, 2000, 1:55 PM

Alex

Administrator (9387 posts)

Nov 6, 2000, 1:55 PM

Post #12 of 16

Shortcut

Re: How to do this..... In reply to

See: perldoc Net::FTP

Cheers,

Alex

--
Gossamer Threads Inc.

Nov 8, 2000, 11:54 PM

Andy

Veteran / Moderator (18441 posts)

Nov 8, 2000, 11:54 PM

Post #13 of 16

Shortcut

Re: How to do this..... In reply to

Hi. I have tried to find these docs, but have had no success. Could you possibly point me in the right direction?

Thanks

A.J.Newby
webmaster@ace-installer.com
http://www.ace-installer.com

Nov 13, 2000, 7:26 PM

BennyHill

User (66 posts)

Nov 13, 2000, 7:26 PM

Post #14 of 16

Shortcut

Re: How to do this..... In reply to

Try

http://www.perldoc.com/perl5.6/lib/Net/FTP.html

Nov 13, 2000, 11:12 PM

Andy

Veteran / Moderator (18441 posts)

Nov 13, 2000, 11:12 PM

Post #15 of 16

Shortcut

Re: How to do this..... In reply to

Thanks, that is great! There is everything i need here.

Yours

A.J.Newby
webmaster@ace-installer.com

Jan 2, 2001, 5:28 AM

Andy

Veteran / Moderator (18441 posts)

Jan 2, 2001, 5:28 AM

Post #16 of 16

Shortcut

Re: How to do this..... In reply to

Just another one; why does this line of Net::FTP give me an error; Frown

$ftp->cdup();

If i comment out this line it all works OK. I had a look at the PerlDoc.com website http://www.perldoc.com/...5.6/lib/Net/FTP.html)
and this code was what they suggested. Please help me out!!!

Thanks

A.J.Newby
webmaster@ace-installer.com
http://www.ace-installer.com