|
|
ВНИМАНИЕ: Използвайте форумите на сайта за дa зададете вашите въпроси.
Въпрос |
От: begin4o |
Дата: 02/09/2004 |
Imam edin adres, naprimer:
http://www.trendmicro.com/download/product.asp?productid=1&show=ptn
Tova e naprimer na PC-Cillina teku6tite virusni definicii.
Na tozi link mi triabva edin arhiv ..lpt757.zip
Gornia link otvaria stranica na koiato ima zip fail, koito
mi e neobhodim, v slu4aia lpt757.zip. A linka e:
http://www.trendmicro.com/ftp/products/pattern/lpt757.zip
Dnes e lpt757.zip, utre e lpt767.zip i t.n.
Kak da izteglia sas script ili da razbera teku6tia No na
arhiva, koito da go zadam vav skripta. Ili po drug niakakav
na4in da go napravia. Ne znam dali sam dostata4no iasen.
|
Отговор #1 |
От: Росен Антонов |
Дата: 02/09/2004 |
Може би не съм на нивото да давам съвет по твоя въпрос, но
ще се опитам все пак и ще приема критиката достойно.
Пак повтарям - това е само съвет (идея), а не крайно
решение: със скрипт (на Perl, поне за него знам, че го може
това) теглиш страницата от първия линк, който си дал. След
това я отваряш и извличаш реда, който съдържа следното:
http://www.trendmicro.com/ftp/products/pattern/lpt759.zip">lpt759.zip
За целта трябва да използваш великите шаблони в Perl, който
са нещо страхотно. След като един път си се докопал до този
ред го подаваш на wget и си сваляш файла.
Едно нещо лично на мен ми се губи - името на библиотеката на
Perl, която работи с http. Ако има някой, който да я каже ще
съм много благодарен.
|
Отговор #3 |
От: mironcho (mironcho< at >linux-bg< dot >org) |
Дата: 02/11/2004 |
Можеш да използваш външни програми за по мързеливо. Ето
какво скалъпих набързо:
#!/usr/bin/perl
#
#
use strict;
use warnings;
my $file = undef;
my @source = `lynx --source
http://www.trendmicro.com/download/product.asp?productid=1&show=ptn`;
foreach (@source) {
if (/(http:\/\/www\.trendmicro\.com\/ftp\/products\/pattern\/lpt\d{3}\.zip)/) {
$file = $1;
}
}
system "wget $file" if (defined $file);
|
Отговор #4 |
От: begin4o |
Дата: 02/13/2004 |
Да пробвах го но нещо не съм разбрал ли не знам
Ето резултата от скриптал
root@myhost:~/my_script# ./antivir
Bareword found where operator expected at ./antivir line 11,
near "//www"
(Missing operator before www?)
Operator or semicolon missing before &show at ./antivir line
11.
Ambiguous use of & resolved as operator & at ./antivir line
11.
Backticks found where operator expected at ./antivir line
11, at end of line
(Missing semicolon on previous line?)
syntax error at ./antivir line 11, near "//www"
Can't find string terminator "`" anywhere before EOF at
./antivir line 11.
root@myhost:~/my_script#
|
<< Mysql malko pomosht (0
) | LPI (0
) >>
|
|
|
|
|