источник
Имя
источник — Оценить файл или ресурс как скрипт TclСинтаксис
источник имяФайлаисточник -кодировка имяКодировки имяФайла
Описание
Эта команда принимает содержимое указанного файла или ресурса и передает его интерпретатору Tcl в качестве текстового скрипта. Возвращаемое значение команды источник равно возвращаемому значению последней выполненной команды в скрипте. Если при оценке содержимого скрипта произошла ошибка, команда источник вернёт эту ошибку. Если изнутри скрипта вызывается команда возврат, то остальная часть файла будет пропущена, и команда источник вернётся нормально со значением, возвращённым командой возврат.Символ конца файла для файлов — «\32» (^Z) для всех платформ. Команда source будет читать файлы до этого символа. Это ограничение не существует для команд чтение или получение, что позволяет работать с файлами, содержащими сегменты кода и данных (скриптовые документы). Если вам нужен символ «^Z» в коде для сравнения строк, вы можете использовать «\032» или «\u001a», которые интерпретатор Tcl безопасно заменит на «^Z».
Ведущий BOM (Byte order mark), содержащийся в файле, игнорируется для кодировок unicode (utf-8, unicode).
Опция -кодировка используется для указания кодировки данных, хранящихся в имяФайла. Если опция -кодировка опущена, используется системная кодировка.
Пример
Запустите скрипт в файле foo.tcl, а затем скрипт в файле bar.tcl:source foo.tcl source bar.tcl
Или:
foreach scriptFile {foo.tcl bar.tcl} {
source $scriptFile
} См. также
файл, cd, кодировка, информация
Licensed under Tcl/Tk terms
https://www.tcl.tk/man/tcl/TclCmd/source.htm
Licensed under Tcl/Tk terms
https://www.tcl.tk/man/tcl/TclCmd/source.htm