regexp output

Просьбы о написании новых скриптов или поиске уже существующих.

Модератор: Модераторы

regexp output

Сообщение EvilHeart » 05 июн 2014 21:19

i make full code .. and regexp is ok.. but when i send command !testback no output show

can someone help me here is my full code

Код: Выделить всё
package require http
bind pub -!- !testback testback
proc testback  {nick uhost hand chan text} {
    set t [::http::geturl http://www.espnfc.com/scores]
    set data [::http::data $t]
    set text [lindex [split $text] 0]
    ::http::cleanup $t
 
   set l [regexp -all -inline -- {<div class="team-name">(.*?)</div>.*?<div class="team-name">(.*?)</div>.*?<div class="team-score">(.*?)</div>.*?<div class="team-score">(.*?)</div>.*?<div class="game-info">(.*?)</div>.*?name="&lpos=scoreboard:(\d+)"} $data]
   
    foreach {black a b c d e f} $l {
   
   
       if {$c == ""} {
      set c "N/A"
       }   
      
       if {$d == ""} {
      set d "N/A"
       }     
       
        set a [string trim [string map {{&nbsp;} {} {\n} {}} $a]]
        set b [string trim [string map {{&nbsp;} {} {\n} {}} $b]]
        set c [string trim [string map {{&nbsp;} {} {\n} {}} $c]]
        set d [string trim [string map {{&nbsp;} {} {\n} {}} $d]]
        set e [string trim [string map {{&nbsp;} {} {\n} {}} $e]]
        set f [string trim [string map {{&nbsp;} {} {\n} {}} $f]]   
       
        regsub -all {<.*?>} $a {} a
        regsub -all {<.*?>} $b {} b
        regsub -all {<.*?>} $c {} c
        regsub -all {<.*?>} $d {} d
        regsub -all {<.*?>} $e {} e
      
      putlog "~$e~$a~$c~$b~$d~$f~$text~"                      
         putserv "PRIVMSG $chan :$e $a $c $b $d $f"
   }
}


here is regexp output
Код: Выделить всё
11:17:46pm / * <EvilHeart> !webby http://www.espnfc.com/scores --regexp <div class="team-name">(.*?)</div>.*?<div class="team-name">(.*?)</div>.*?<div class="team-score">(.*?)</div>.*?<div class="team-score">(.*?)</div>.*?<div class="game-info">(.*?)</div>.*?name="&lpos=scoreboard:(\d+)"--
11:17:47pm / * <ToWeR> regexp: capture1 ( Platense )
11:17:48pm / * <ToWeR> regexp: capture2 ( Temperley )
11:17:49pm / * <ToWeR> regexp: capture3 (  )
11:17:51pm / * <ToWeR> regexp: capture4 (  )
11:17:53pm / * <ToWeR> regexp: capture5 ( 11:00 PM GMT )
11:17:56pm / * <ToWeR> regexp: capture6 ( 379855 )
EvilHeart
 
Сообщения: 42
Зарегистрирован: 28 апр 2011 21:29
Благодарил (а): 7 раз.
Поблагодарили: 0 раз.
Версия бота: Eggdrop 1.8

Re: regexp output

Сообщение EvilHeart » 08 июл 2014 23:24

кто поможет исправить мой сценарий
EvilHeart
 
Сообщения: 42
Зарегистрирован: 28 апр 2011 21:29
Благодарил (а): 7 раз.
Поблагодарили: 0 раз.
Версия бота: Eggdrop 1.8

Re: regexp output

Сообщение tvrsh » 09 июл 2014 19:00

You want to parse full page? What do need to post to channel?
Have fun.
-
Получить помощь можно на каналах #egghelp в сети IrcNet.ru и #eggdrop в сети RusNet(Ключ канала eggdrop).
Перед созданием новой темы внимательно читайте Правила оформления топиков.
Аватара пользователя
tvrsh
 
Сообщения: 1230
Зарегистрирован: 19 авг 2008 16:55
Откуда: Russian Federation, Podolsk
Благодарил (а): 6 раз.
Поблагодарили: 130 раз.
Версия бота: Eggdrop 1.6.20+suzi

Re: regexp output

Сообщение EvilHeart » 02 авг 2014 21:07

i need like !testback teamname
show temname and statistics like also
EvilHeart
 
Сообщения: 42
Зарегистрирован: 28 апр 2011 21:29
Благодарил (а): 7 раз.
Поблагодарили: 0 раз.
Версия бота: Eggdrop 1.8

Re: regexp output

Сообщение EvilHeart » 03 сен 2014 21:56

no help?
EvilHeart
 
Сообщения: 42
Зарегистрирован: 28 апр 2011 21:29
Благодарил (а): 7 раз.
Поблагодарили: 0 раз.
Версия бота: Eggdrop 1.8


Вернуться в Заявки на скрипты

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

cron