egghelp/eggheads community

I tried with ur version, but now ill get an error :
:/

proc format_1024_units {value} { set len [string length $value] if {$value < 1024} { return [format "%s B" $value] } else { set unit [expr {($len - 1) / 3}] return [format "%.1f %s" [expr {$value / pow(1024,$unit)}] [lindex [list B KB MB GB TB PB EB ZB YB] $unit]] } } But the re...

First of all THX

The hint leads me the right way.

There was an "Sign" in that var That "" wouldnt be stripped by "set amount [stripcodes abcgru $amount]"

Now i have to remove that crap, not sure how but perhaps ill find a way.

thx nml375

proc do:format {amount} { set amount [stripcodes abcgru $amount] if {[string match "*KB." $amount]} { set amount [string map {"KB." ""} $amount] set amount [expr double($amount)*1024] } elseif {[string match "*MB." $amount]} { set amount [string map {"MB...