16 lines
250 B
Plaintext
16 lines
250 B
Plaintext
|
#!/mod/bin/jimsh
|
||
|
|
||
|
package require cgi
|
||
|
|
||
|
puts "Content-Type: text/html"
|
||
|
puts ""
|
||
|
|
||
|
cgi_input
|
||
|
#cgi_dump
|
||
|
|
||
|
catch { set service [dict get $_cgi service] }
|
||
|
catch { set action [dict get $_cgi action] }
|
||
|
|
||
|
catch { puts [exec /mod/bin/service $action $service] }
|
||
|
|