TCL pomoc potřeboval ... Urgentní!

[Sumitha Sudhakaran]

Předpokládejme, že mám soubor TCL se spustit, říkají test.tcl .. a chci zadat soubor, který chcete zkoušet, říkají test.tcl file1. WHA mám dělat, aby extrahovat "file1" z příkazového řádku a provést zkoušku na souboru .. Potřebuji příkaz TCL, která pomáhá extrahovat argument z příkazové řádky ..

 

[blooz]

Předpokládejme, že mám soubor TCL se spustit, říkají test.tcl .. a chci zadat soubor, který chcete zkoušet, říkají test.tcl file1. WHA mám dělat, aby extrahovat "file1" z příkazového řádku a provést zkoušku na souboru .. Potřebuji příkaz TCL, která pomáhá extrahovat argument z příkazové řádky ..

Všechny Tcl skripty mají přístup ke třem předdefinovaných proměnných. $ Argc - počet položek argumentů předaných skriptu. $ Argv - seznam argumentů. $ Argv0 - jméno skriptu.

 puts "Script jméno je" uvádí [Lindex $ argv0] puts "Druhý argument je" uvádí [Lindex $ argv 0] puts "Třetí argument je" uvádí [lindex $ argv 1]

Např.

 tclsh argtest.tcl myarg1 myarg2

výkon Script jméno je argtest.tcl Druhý argument je myarg1 Třetí argument je myarg2