CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
INDEX
Search Posts SEARCH
POSTS
Who's Online WHO'S
ONLINE
Log in LOG
IN

Home: Perl Programming Help: Advanced:
file downloading using perl

 



srijithbhandary
Novice

Jul 21, 2011, 5:28 AM

Post #1 of 2 (2459 views)
file downloading using perl Can't Post

Im trying to write a perl code to do the following task.

I have a website which is located in a diffirent country.
I want to download a file from that site everyday.
The file name keeps on changing everyday.
say the file name is CTP-latest-5.3.0.37.iso
next day it may change to "CTP-latest-5.3.0.38.iso" or remain same.

I want to download only if the version number (ie. 38 in above example("38.iso") is not the same from last sucessful download or else dont download.

Im very poor in perl, can someone help me on this ?

i tried with


#!/usr/bin/perl

use LWP::Simple;

#-- fetch the zip and save it as perlhowto.zip
my $status = getstore("http://star.mywebsite/CTP-LATEST-4.4.4.37.iso", "CVP-LATEST-5.3.0.37.iso");

if ( is_success($status) )
{
print "file downloaded correctly\n";
}
else
{
print "error downloading file: $status\n";
}

This works fine in downloading the file, But I need to have a check on version number. So I want to download only if the version number has been changed from the version number of previous successful download.

thank you for your time.


miller
User

Jul 22, 2011, 9:39 PM

Post #2 of 2 (2369 views)
Re: [srijithbhandary] file downloading using perl [In reply to] Can't Post

1) Use LWP to download the webpage that actually links to the file.
2) Parse that file to determine the current resource version
3) Download that file if it's different from the previously downloaded resource.

- Miller

 
 


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives