tmsh::get_config¶
Description¶
Returns a list of configuration items as Tcl objects. Each of these objects can be passed to the following commands that accept an $obj argument:
The output is the equivalent of the TMSH “list” command.
Examples¶
proc script::run {} {
if { $tmsh::argc < 2 } {
puts "Requires one argument: <Poolname beginning string>"
} else {
set poolstring [lindex $tmsh::argv 1]
set len [expr { [string length $poolstring] - 1 }]
}
foreach {pool} [tmsh::get_config /ltm pool] {
if { [string range [tmsh::get_name $pool] 0 $len] equals $poolstring } {
tmsh::delete ltm pool [tmsh::get_name $pool]
}
}
}