adquery user -D "$(hostname -s)"

adquery user `hostname -s` --dump

adedit myscript "$(adquery user -D "$(hostname -s)")"

if { $argc != 1 } {
  puts "format: $argv0 hostDN"
  exit 1
}

set the_dn [lindex $argv 0]

bind ... (credentials here)

select_object $the_dn