вопрос по perl
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя |
Сообщение |
<< Старые топики Новые топики >> |
|
|
вопрос по perl - 2008-09-09 20:04:04.476666
|
|
|
Artur1313
Сообщений: 120
Оценки: 0
Присоединился: 2008-01-25 01:50:01.410000
|
я совершенно не знаком с этим языком и с его возможностями. хочу узнать возможно ли с помощью него (например) выдернуть html любой странички в инете, отредактировать его и запихнуть в файл на компе?
|
|
|
RE: вопрос по perl - 2008-09-09 20:51:13.406666
|
|
|
Pashkela
Сообщений: 3756
Оценки: 736
Присоединился: 2007-01-03 06:19:40.900000
|
можно
|
|
|
RE: вопрос по perl - 2008-09-10 00:39:05.106666
|
|
|
med
Сообщений: 138
Оценки: 0
Присоединился: 2006-06-12 21:06:38
|
quote:
ORIGINAL: Artur1313 я совершенно не знаком с этим языком и с его возможностями. хочу узнать возможно ли с помощью него (например) выдернуть html любой странички в инете, отредактировать его и запихнуть в файл на компе? ну это дело поправимое - книжек тьма - начни с чего нибудь лёгкого типа серии learning perl /ebookshare.нet/ - за неделю поймёшь логику составления скриптов итп, да и примеры для модулей в cpan рулят: http://search.cpan.org/search?query=html+parser&mode=all а вообще для того чтобы всего лишь выдернуть страничку, слегка скорректировать и сохранить, подойдёт wget или lynx и немного знаний bash scripting, cat, awk, grep н sed, думаю этим можно и без перла обойтись - главное как говориться желание.
|
|
|
RE: вопрос по perl - 2008-09-10 00:57:43.256666
|
|
|
magistr_bender
Сообщений: 977
Оценки: 0
Присоединился: 2008-02-22 20:10:21.133333
|
ну а если предположим человек незнаком с юникс система и юзает перл под виндой как я например)
|
|
|
RE: вопрос по perl - 2008-09-10 01:52:45.010000
|
|
|
Pashkela
Сообщений: 3756
Оценки: 736
Присоединился: 2007-01-03 06:19:40.900000
|
#!/usr/bin/perl
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$res = $ua->get('http://mail.ru/index.php', {
'referer' => '',
'CookieDate' => 1 });
$text = $res->as_string;
$text =~s/<a href="(.*)"/$text=$1/gie; так или $text =~s/(.*)gref="//gi; или так $text =~s/"(.*)//gi;
print $text;
quote:
ORIGINAL: magistr_bender ну а если предположим человек незнаком с юникс система и юзает перл под виндой как я например) юзай perl2exe или просто установи себе ActivePerl (или наборот сначала, а лучше и то и другое)
|
|
|
RE: вопрос по perl - 2008-09-10 01:59:51.716666
|
|
|
magistr_bender
Сообщений: 977
Оценки: 0
Присоединился: 2008-02-22 20:10:21.133333
|
ну у меня актив перл и так стоит.. и я его юзаю.. та и в юниксах немного шарю.. просто я предпологал что ктонить выложит для ТС какойнить учебник типо "перл для нубов"
|
|
|
|
|