egghelp/eggheads community

creating a check...

2004-02-28T04:24:26-04:00

ok - I've set the global vars at the top and put my check in just before the putserv:

if {$rtrlast != $rtr} {
set rtrlast $rtr

but it's not sending anything to the channel even if the headline is new...

Statistics: Posted by NewzUK — Sat Feb 28, 2004 4:24 am

creating a check...

2004-02-28T00:58:32-04:00

It has to download and parse the file before it can check to see if the headline is repeated. Just do the check right before the putserv.

Statistics: Posted by stdragon — Sat Feb 28, 2004 12:58 am

creating a check...

2004-02-27T19:08:49-04:00

hmmm thanks - but in this case the vars I need to check so the headline dosn't repeat are set near the end of the proc operation so not sure how that works...

Statistics: Posted by NewzUK — Fri Feb 27, 2004 7:08 pm

creating a check...

2004-02-26T12:05:24-04:00

what does that mean dollar?

You don't replace "set" with "global", you set your variables and at the top of each proc you want to use them with add "global ". Example:
proc abc {args} {global varname; set varname 123}

proc cba {args} {global varname; do stuff with $varname}

Statistics: Posted by dollar — Thu Feb 26, 2004 12:05 pm

creating a check...

2004-02-25T22:31:25-04:00

what does that mean dollar?

Statistics: Posted by NewzUK — Wed Feb 25, 2004 10:31 pm

creating a check...

2004-02-25T15:01:47-04:00

thanks will try that - to set that do you replace 'set' with 'global'?

No. ( )

Statistics: Posted by dollar — Wed Feb 25, 2004 3:01 pm

creating a check...

2004-02-25T01:43:04-04:00

thanks will try that - to set that do you replace 'set' with 'global'?

Statistics: Posted by NewzUK — Wed Feb 25, 2004 1:43 am

creating a check...

2004-02-25T01:35:04-04:00

Have you tried using a global variable to save the headline? Then next time, check the headline against the saved headline and if it's the same, don't print it out.

Statistics: Posted by stdragon — Wed Feb 25, 2004 1:35 am

creating a check...

2004-02-24T22:48:48-04:00

hi

I'm trying to make a check for this script so the headline posted won't repeat if it's the same the next time it retrieves. I've tried a few things but no luck yet...

proc pub:readaap { nick uhost handle channel arg } {
set url http://www.url.com
set file news/news.txt
exec lynx -preparsed -dump -width=5000 $url > $file
set aapf [open $file r]
set data [read $aapf]
foreach line [split $data \n] {
if {[string match *17\]* $line]} {
set aap [string range $line 7 end]
foreach lines [split $data \n] {
if {[string match *17.* $lines]} {
set aapurl [string range $lines 5 end]
putserv "PRIVMSG #Newsroom :7,7 1,15 [gettime +0]ET $aap - AAP "
putserv "NOTICE #Newsroom2 :$aapurl"
break
}
}
}
}
}

Statistics: Posted by NewzUK — Tue Feb 24, 2004 10:48 pm