covid-19.tcl by blackshadow

[abah]

ubuntu covid work fine but openbsd not working

[caesar]

Did you check to see if you got the tls package there?

[abah]

Did you check to see if you got the tls package there?

Code: Select all

% package require tls
1.6.7
% 

[caesar]

You tried with the change i suggested and still get the same error?

[abah]

Code: Select all

proc corona:getdata {} {
	set link "https://www.worldometers.info/coronavirus/"
	::http::register https 443 tls:socket
	set ipq [http::config -useragent "lynx"]
	set ipq [::http::geturl "$link" -timeout 5000] 
	set status [::http::status $ipq]
if {$status != "ok"} { 
	::http::cleanup $ipq
	return 
}

Code: Select all

package require http

proc tls:socket args {
   set opts [lrange $args 0 end-2]
   set host [lindex $args end-1]
   set port [lindex $args end]
   ::tls::socket -servername $host {*}$opts $host $port
}

Code: Select all

Tcl error [corona:pub]: wrong # args: should be "tls::socket ?options? host port"

[Ezekiel]

you need this:

Code: Select all

cd /tmp
wget https://core.tcl-lang.org/tcltls/uv/tcltls-1.7.20.tar.gz
tar -xzf tcltls-1.7.20.tar.gz
cd tcltls-1.7.20
./configure
make (ca root)
make install

restart the bot then and should work..

[abah]

using shell user not root

[sysusr]

cool script but is there any way you could do states/provinces?

[abah]

thanks my problem solved but i get one problem again.

I am used latest version but i want to autocovid show random country not only global contry

[blameshift]

Locate this line:

Code: Select all

http::register https 443 [list ::tls::socket -autoservername true]

and replace it with:

Code: Select all

::http::register https 443 tls:socket

and under the 'package require http' line add this code:

Code: Select all

proc tls:socket args {
	set opts [lrange $args 0 end-2]
	set host [lindex $args end-1]
	set port [lindex $args end]
	::tls::socket -servername $host {*}$opts $host $port
}

Thank you sir this helped me on debian 9

100% working thank you so much

[nix]

Hi,

Is this script still works?

Because I can't get it to work. The bot return replies with no data/statistics included.

p/s I got all the package updated

[BLaCkShaDoW]

Download it from here : https://tclscripts.net/downloads/covid19-tcl/

[abah]

Download it from here : https://tclscripts.net/downloads/covid19-tcl/

Is this TCL running in Centos ?

[CrazyCat]

TCL rarely depends on ditribution, it could depends on eggdrop and tcl (tcllib) version.

[abah]

TCL rarely depends on ditribution, it could depends on eggdrop and tcl (tcllib) version.

thanks