auto_execok (public)

 auto_execok name

Defined in packages/acs-tcl/tcl/tcllib-doc-procs.tcl

Find a command that Tcl can invoke with exec.

Parameters:

name (required)

Command name or path.

Returns:

A command prefix suitable for exec, or an empty string if unavailable.

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    global auto_execs env

    if {[info exists auto_execs($name)]} {
    return $auto_execs($name)
    }
    set auto_execs($name) ""
    if {[llength [file split $name]] != 1} {
    if {[file executable $name] && ![file isdirectory $name]} {
        set auto_execs($name) [list $name]
    }
    return $auto_execs($name)
    }
    foreach dir [split $env(PATH) :] {
    if {$dir eq ""} {
        set dir .
    }
    set file [file join $dir $name]
    if {[file executable $file] && ![file isdirectory $file]} {
        set auto_execs($name) [list $file]
        return $auto_execs($name)
    }
    }
    return ""

XQL Not present:

Generic, PostgreSQL, Oracle