tclsh

0熱

1答えて

シェルスクリプト内でtclshを使用しているときにexecからの出力がありません

私はここで奇妙な状況があります。私はスクリプトのgetValue.itclでexecを実行する必要がありますが、入力リダイレクションでインラインで実行しようとすると出力が得られません。申し訳ありませんが、私は間違った条件を使用しています。このスクリプトを使用すると、このスクリプトの他の面で役立ちます。そうしないと、断片を分離する必要があります。そして、私はtcl 8.0（そのオプションはありませ

2熱

2答えて

TCLでPerlとPythonとで動作が異なる正規表現パターン

正規表現を使用して文字列からサブ文字列を抽出しようとしています。以下Python（与え所望の結果）の作動コード Pythonの溶液である x = r'CAR_2_ABC_547_d' >>> spattern = re.compile("CAR_.*?_(.*)") >>> spattern.search(x).group(1) 'ABC_547_d' >>> Perlのソリューション

1熱

2答えて

tclスクリプトでは、putsを使ってコンソールとファイルに同時に文字列を書き込むことはできますか？

# Prints the string in a file puts $chan stderr "$timestamp - Running test: $test" # Prints the string on a console puts "$timestamp - Running test: $test" putsの出力を画面とログファイルに同時に送信する方法はありますか？現在、私

0熱

1答えて

Tcl tclshセットアップ

私はちょうどTclで始まり、エディタとインタープリタを正しく設定しようとしています。 Tclのダウンロードページでは、ActiveStateのActiveTclを使用することをお勧めしますが、私はTclをプロダクションで使用することを学んでおり、支払いを避けたいと考えています。私は、学習に使用するEclipseのDLTKを設定しようとしたが、私は私が通訳としてそれを使用する実行可能にtcls

0熱

1答えて

複数の引数を持つ別のtclスクリプトからtclスクリプトを呼び出す

現在のスクリプトからスクリプト（tclscript）を呼び出しています。この「無効なコマンド名エラー」を参照すると、tclスクリプトはパッケージの正しいバージョンがインストールされているかどうかをチェックします。 #!/bin/tclsh # i am doing this for multiple packages in a loop set list {/usr/local/script}

0熱

2答えて

Tcl [regexp]：変数が内部にあるブロックと一致する場合の式

Ifブロックが特定のファイル内にあるかどうかを調べたいと思います。次のように私は、ファイルnew.tclを持っている： if { [info exists var1] } { if { "$var1" == "val1" } { puts "var1 has value as val1" } } else { puts "var1 does not ex

1熱

1答えて

ウィンドウシェル（wish/tclsh）GUIをバイパスして代わりにターミナルを使用する方法はありますか？

私は、非常に面倒なGUIがtclsh/wishで書かれたソフトウェアパッケージを持っています。私はターミナルを介してソフトウェアを制御し、それを実行するためのスクリプトを作成したいと考えています。 GUIが欲しいのはかなり長いです（37000行以上）ので、詳細を読んで、それぞれのコマンドラインインターフェイスを書くのは避けてください。入力したいフィールドのボタンのシーケンスと入力フィールドをすでに

3熱

1答えて

異なる回答を与えるtclの異なるバージョン

私はtcl 8.0 verisonでこの機能を実行しています。 proc test {} { set owner 212549316 set val [regexp {[0-9]{9}} $owner] puts $val } TCL 8.6で同じコード、出力1であるが、TCL 8.0でそれが0あります。文字列にtcl 8.0の文字列が9桁しか含まれていないか

-2熱

1答えて

複数行のテキストの後の文字列を一致させる

以下の出力から「Manage VLAN」の値を正規表現で抽出し、後でスクリプトで使用する変数に値を格納する必要があります。 set switch 100.10.100.100 set Username "test" set Password "test" spawn ssh -o StrictHostKeyChecking=no [email protected]$switch expe