ключики - они и есть ключики :) ну то есть не просто запустить ljsm.pl, а ljsm.pl -a например На всякий случай под лыжекатом (не знаю, работает ли он в комментах, простите, читатели данного треда,если что) привожу как раз то, что написано в самом скрипте в самом начале - там сначала комментарии, а потом набор констант, которые надо указать для своего случая.
perl ljsm.pl [-p -m] user1 user2 ... retrive messages for the given users and save them to the local directory -r = resume processing if there is already local file for the given post -m = retrieve memories, not posts -a = get memories AND posts -O = overwrite existing files (NOT recommended) -I = ignore network errors and continue fetching posts
=head1 SETUP I've tested this script with Windows Me, ActiveState perl v. 5.6.0 with the following ppm modules installed: HTML-Parser 2.33, HTML-SimpleLinkExtor 0.71, libwww-perl 5.48 If you want to use UTF-8 conversion to local charset you'll also need to setup Unicode-MapUTF8.
-------- How to setup Unicode-MapUTF8 for Windows ------------ 1. ppm install Unicode-Map 2. download, untar and ungzip Unicode-MapUTF8 3. install Unicode-MapUTF8 ignoring messages about missing modules 4. go to %PERL%\site\lib\Unicode and edit MapUTF8.pm: 4.1 comment out 'use Unicode::Map8' and 'use Jcode' 4.2. insert 'use Unicode::Map' line if it is not already there --------------------------------------------------------------
вот дальше там будут константы в виде (кусочек) -
use constant LOGIN => 'mbravo'; # leave it empty if you don't want to login use constant PASSWORD => 'xxxxxx'; use constant START_YEAR => 2001; # fetch data back to this year use constant CLEANUP_HTML => 1; # 0 - leave html as it is, 1 - remove sidebars etc
и так далее - вписываете то, что вам нужно, и вперед
О Боже. У меня все равно остались вопросы. Слушайте, мне ужасно неловко, что мы тут авве сыпем все это в почту, можем мы с Вами перейти к какому-нибудь более уединенному месту для беседы, типа через почту или через аську, как Вам удобней (и если у Вас есть возможность тратить на меня свое время).
![[identity profile]](https://www.dreamwidth.org/img/silk/identity/openid.png){kind=small}
![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
timeasmymeasure
no subject
Date: 2002-09-29 02:11 am (UTC)На всякий случай под лыжекатом (не знаю, работает ли он в комментах, простите, читатели данного треда,если что)
привожу как раз то, что написано в самом скрипте в самом начале - там сначала комментарии, а потом набор констант, которые надо указать для своего случая.
perl ljsm.pl [-p -m] user1 user2 ...
retrive messages for the given users and save them to the local directory
-r = resume processing if there is already local file for the given post
-m = retrieve memories, not posts
-a = get memories AND posts
-O = overwrite existing files (NOT recommended)
-I = ignore network errors and continue fetching posts
=head1 SETUP
I've tested this script with Windows Me, ActiveState perl v. 5.6.0
with the following ppm modules installed:
HTML-Parser 2.33, HTML-SimpleLinkExtor 0.71, libwww-perl 5.48
If you want to use UTF-8 conversion to local charset you'll also
need to setup Unicode-MapUTF8.
-------- How to setup Unicode-MapUTF8 for Windows ------------
1. ppm install Unicode-Map
2. download, untar and ungzip Unicode-MapUTF8
3. install Unicode-MapUTF8 ignoring messages about missing modules
4. go to %PERL%\site\lib\Unicode and edit MapUTF8.pm:
4.1 comment out 'use Unicode::Map8' and 'use Jcode'
4.2. insert 'use Unicode::Map' line if it is not already there
--------------------------------------------------------------
вот дальше там будут константы в виде (кусочек) -
use constant LOGIN => 'mbravo'; # leave it empty if you don't want to login
use constant PASSWORD => 'xxxxxx';
use constant START_YEAR => 2001; # fetch data back to this year
use constant CLEANUP_HTML => 1; # 0 - leave html as it is, 1 - remove sidebars etc
и так далее - вписываете то, что вам нужно, и вперед
Надеюсь, все это чем-то помогло.
no subject
Date: 2002-09-29 03:17 am (UTC)У меня все равно остались вопросы.
Слушайте, мне ужасно неловко, что мы тут авве сыпем все это в почту, можем мы с Вами перейти к какому-нибудь более уединенному месту для беседы, типа через почту или через аську, как Вам удобней (и если у Вас есть возможность тратить на меня свое время).
no subject
Date: 2002-09-29 02:47 pm (UTC)