@# Quotes DB     useful, funny, interesting





Google
 
Web www.quotesdb.info
Undernet  |  EFnet  |  Quakenet  |  Freenode  |  Dalnet  |  Ircnet  |  Galaxynet
Page: 1 2 3 4 5



Comments:

<0> hehe
<0> i have like 2309 need to devide it by 1000 and only save 2.3 and not 2.309
<1> then you need expr
<2> math
<1> ;puts [expr 1500 / 1000]
<3> smokey: #2335 (stdout) 1
<2> expr round(2309 / 1000)
<3> hest: #2336 (306 clicks) Tcl: 2
<1> yeah
<0> need the .3 tho
<2> dont remember the syntax as we speak
<0> k
<2> expr 2309 / 1000.
<3> hest: #2341 (271 clicks) Tcl: 2.309
<2> expr round(2309 / 1000.)
<3> hest: #2342 (267 clicks) Tcl: 2



<2> expr ?
<4> expr -> http://www.tcl.tk/man/tcl8.4/TclCmd/expr.htm
<3> expr -> http://Tcl.Tk/man/tcl8.5/TclCmd/expr.htm
<1> i wish i could get dtcl for apache to work, so i can change my site over to tcl.
<5> ouch
<2> you'd like rivet to run, that is
<2> and yes, i have the same problem on my Win32 development environment
<1> dtcl is for apache1.3 which i run.
<2> got it working on on FreeBSD though
<2> dtcl is obsolote, my friend
<1> i cant.
<0> hmm allready looking there hest, not sure how to do it tho :D
<2> Rivet is the new mod_dtcl
<1> what version is rivet for?
<2> 1.3 as well
<1> really?
<2> you have mod_tcl which is for 2.0
<2> yes
<2> http://tcl.apache.org/rivet/
<1> hm, weird.
<2> you also have cgi.tcl by don libes
<2> think that's a good alternative
<2> havent tried it my self, but i know strikelight got it working like a charm
<1> weird, the cvs server is down.
<2> hmm
<2> wasnt very descriptive that math-stuff, ill admit that, Nozz
<2> smokey: use the webdl
<0> hest hehe
<0> any idea how to do it? :D
<1> hm. now i have to change httpd to 2.0
<2> im looking now
<2> why, smokey?
<0> ;puts [expr 2309 / 1000.0]
<3> Nozz: #2373 (stdout) 2.309
<1> nvm
<1> forgot rivet is for 1.3 not 2.0
<1> i wish rivet was a default pkg on fbsd
<2> hmm
<2> this is crap
<2> ;expr double 2.309
<3> hest: #2379 (362 clicks) Tcl error: syntax error in expression "double 2.309": expected parenthesis enclosing function arguments
<2> ;expr double(2.309)
<3> hest: #2380 (239 clicks) Tcl: 2.309
<6> ;expr (40 * 1.034) + 0.80
<3> [GRiMMY]: #2381 (316 clicks) Tcl: 42.16
<2> ;expr 2.309 * 1
<3> hest: #2382 (228 clicks) Tcl: 2.309
<2> well...
<2> thjis was crap
<2> ;set str [string index 309 0]
<3> hest: #2385 (317 clicks) Tcl: 3
<2> hrm
<1> warning: error while sourcing packages/simpledb/pkgIndex.tcl: can't read "dir": no such variable
<1> how do i fix that? any ideas?
<2> ;proc cust_round {num decs} {set tmp [lindex [split $numb .] 1]; return [expr round $num][string range $tmp 0 $decs-1]}
<3> hest: #2389 (362 clicks) Tcl:
<2> ;cust_round 2.309 1
<3> hest: #2390 (788 clicks) Tcl error: can't read "numb": no such variable
<2> ;proc cust_round {num decs} {set tmp [lindex [split $num .] 1]; return [expr round $num][string range $tmp 0 $decs-1]}



<3> hest: #2391 (396 clicks) Tcl:
<2> ;cust_round 2.309 1
<3> hest: #2392 (851 clicks) Tcl error: syntax error in expression "round 2.309": expected parenthesis enclosing function arguments
<2> ghey
<2> ;proc cust_round {num decs} {set tmp [lindex [split $num .] 1]; return [expr round($num)][string range $tmp 0 $decs-1]}
<3> hest: #2394 (364 clicks) Tcl:
<2> ;cust_round 2.309 1
<3> hest: #2395 (1139 clicks) Tcl error: bad index "1-1": must be integer or end?-integer?
<6> smokey
<2> ;proc cust_round {num decs} {set decs [expr $decs - 1];set tmp [lindex [split $num .] 1]; return [expr round($num)][string range $tmp 0 $decs]}
<3> hest: #2397 (367 clicks) Tcl:
<2> ;cust_round 2.309 1
<3> hest: #2398 (906 clicks) Tcl: 23
<6> is that not just a coding error in pkgIndex
<2> ;proc cust_round {num decs} {set decs [expr $decs - 1];set tmp [lindex [split $num .] 1]; return [expr round($num)].[string range $tmp 0 $decs]}
<3> hest: #2400 (402 clicks) Tcl:
<2> ;cust_round 2.309 1
<3> hest: #2401 (861 clicks) Tcl: 2.3
<0> nice one hest
<2> ;cust_round 2.309 3
<3> hest: #2403 (737 clicks) Tcl: 2.309
<2> ;cust_round 2.309 2
<3> hest: #2404 (685 clicks) Tcl: 2.30
<0> ;cust_round 2.309 5
<3> Nozz: #2405 (718 clicks) Tcl: 2.309
<2> that works, at least
<0> ;cust_round 2.309 0
<3> Nozz: #2407 (736 clicks) Tcl: 2.
<0> thx alot mate
<2> its probably hella slow
<2> and im SURE there's a simpler way to do it
<2> i've just forgot atm
<1> sweet. it does work.
<0> hest, thx alot mate, well it might be slow etc
<0> but it works
<0> if you remember that other way, plz hola
<0> :D
<1> anyone know how you make apache print out what mods it has when a page isnt found?
<7> uh
<2> not using PHP
<2> not using tcl, i mean
<2> phpinfo()
<2> i will, Nozz
<0> thx
<7> ;cust_round 2.69 0
<3> __Gotisch: #2428 (685 clicks) Tcl: 3.
<6> phpinfo() will do it in php
<6> no idea in tcl =P
<7> tclinfo
<7> muahahaha
<7> j/k
<6> lol
<0> hmm have another one, hehe i **** at tcl ;(
<0> Anyways lets say i have some lines, 01 testing; 03 teast; 02 asd; 12 asd
<6> ok
<0> those lines are in a file
<6> ok
<0> now i wanna sort em and put em back in the file ;)
<0> after the number
<6> ok
<0> so it will be 01 test; 02 .. and so
<0> ;)
<6> set file [open file r]; set read [read $file]; close $file
<0> got that ;)
<7> that function is wrong
<7> ; cust_round 5,55555 3
<3> __Gotisch: #2447 (720 clicks) Tcl error: too many arguments for math function
<6> foreach line [split $read \n] {
<7> ; cust_round .,55555 3
<3> __Gotisch: #2448 (741 clicks) Tcl error: syntax error in expression "round(.,55555)": character not legal in expressions
<7> ; cust_round 5.55555 3
<3> __Gotisch: #2449 (729 clicks) Tcl: 6.555
<6> wait
<7> should be 5.556


Name:

Comments:

Please enter the result of the sum 63 + 46 (to avoid spam):






Return to #tcl
or
Go to some related logs:

mirc message everyone
#netbsd
Whigby Island
#politics
#politics
windows boot sector fale
turksh song
usenet momsteachingteens
#debian
#windowsxp



Home  |  disclaimer  |  contact  |  submit quotes