Estou tentando baixar um arquivo de um site. Mas quero fazer o download apenas se a versão do arquivo for mais recente que o mesmo arquivo que tenho.

O nome do arquivo é CTP-Latest5.0.37.iso

Preciso verificar a string "37" no nome do arquiv

Então, se o número 37 for maior que a versão que já estou tendo, somente eu baix

Uma vez que baixei o arquivo, desejo armazenar a string "37" para que eu possa lê-lo na próxima vez em que executar o código perl para verificar a versão

Aqui está meu código que estou tentando com

#!/usr/bin/perl
use LWP::Simple;
 #my $version =37;//this whole line is commented
Open file version.txt and get the version number(say 37)and store it in $version    


$pageURL="http://www.google.comisos/psfsS5.3/LATIMGODCVP/"; 

$simplePage=get($pageURL);

Now $simplePage has the substring  "CTP-LATEST-5.3.0.(some_version_number).iso" 

I need to get that "some_version_number". HOW ?


if(some_version_numner > $version)

{


#-- fetch the zip and save it as perlhowto.zip
my $status = getstore("http://www.google.com/isos/psfsS5.3/LATIMGODCVP/CVP-LATEST-5.3.0."$version".iso", "CTP-Latest5.3.0.$version.iso");

if ( is_success($status) )
{
 print "file downloaded correctly\n";

 Store the "some_version_number in file version.txt (for next time use)

}
else
{
 print "error downloading file: $status\n";
 }

}

Espero que tudo esteja claro no código. O version.txt possui apenas 1 string armazenada com qualquer número (digamos 37 ou 45 ou 89 etc)

lguém pode me ajudar em como fazer o resto do códig