Posted to tcl by mookie at Tue Nov 04 11:23:26 GMT 2025view pretty
variable immute abc123
variable [switch {$immute {
default {
base16_$immute [binary encode hex $immute]
switch $immute {
abc123 { puts "no modification" }
transform { set $immute [binary encode hex $immute]}
} ;# end switch
}
} ;# end switch