Как достать часть строки

[PetkewichAndrej 0]

    Добрый день, вопрос по PostBuild! Есть переменная $mom_output_file_full_name c помощью которой можно вывести полное имя файла программы, пример(D:\NX_2506\888-2222-11111\100.008\PRO_100_008\CAM_008_CHIST.MPF), как от сюда взять имя каталога куда программа попадает, в данном случае (PRO_100_008) , и потом вывести отдельно в строку этот каталог ??? 

   С помощью этого хочу решить следующую задачу ЧПУ Sinumerik 840d  :

%_N_0200_MPF
;$PATH=/_N_WKS_DIR/_N_999999_WPD
; /Start of Program
;
; /PART NAME   :D:\NX_2506\888-2222-11111\100.008\CAM_008_CHIST.prt
; /DATE TIME   :Thu Nov  6 11:20:11 2025
; /BASE NAME   :CAM_008_CHIST
; /FULL NAME   :D:\NX_2506\888-2222-11111\100.008\PRO_100_008\CAM_008_CHIST.MPF

 

надо что бы вместо 999999 подставлялось PRO_100_008.

или может есть другое какое решение?

 

 

[KrivoShip 9]

Навскидку:

set a $mom_output_file_full_name

regsub {\\[^\\]*$} $a "" b

regexp {[^\\]*$} $b c

$c - искомое значение, между двумя последними "\".

 

[an-kval 31]

1 час назад, KrivoShip сказал:

Навскидку:

set a $mom_output_file_full_name

regsub {\\[^\\]*$} $a "" b

regexp {[^\\]*$} $b c

$c - искомое значение, между двумя последними "\".

 

Могу ошибаться,  не такой ли результат выйдет?

 

set a "\path_1\folder\file.mpf"
regsub {\\[^\\]*$} $a "" b

$b = \path_1\folder

 

regexp {[^\\]*$} $b c

$c = path_1folder

Edited November 6 by an-kval

[an-kval 31]

8 часов назад, an-kval сказал:

Могу ошибаться,  не такой ли результат выйдет?

Ошибся, проверил в postbuilder, работает. Вывод папки перед названием файла.

[Stanislav 30]

 

06.11.2025 в 11:38, PetkewichAndrej сказал:

    Добрый день, вопрос по PostBuild! Есть переменная $mom_output_file_full_name c помощью которой можно вывести полное имя файла программы, пример(D:\NX_2506\888-2222-11111\100.008\PRO_100_008\CAM_008_CHIST.MPF), как от сюда взять имя каталога куда программа попадает, в данном случае (PRO_100_008) , и потом вывести отдельно в строку этот каталог ??? 

   С помощью этого хочу решить следующую задачу ЧПУ Sinumerik 840d  :

%_N_0200_MPF
;$PATH=/_N_WKS_DIR/_N_999999_WPD
; /Start of Program
;
; /PART NAME   :D:\NX_2506\888-2222-11111\100.008\CAM_008_CHIST.prt
; /DATE TIME   :Thu Nov  6 11:20:11 2025
; /BASE NAME   :CAM_008_CHIST
; /FULL NAME   :D:\NX_2506\888-2222-11111\100.008\PRO_100_008\CAM_008_CHIST.MPF

 

надо что бы вместо 999999 подставлялось PRO_100_008.

или может есть другое какое решение?

 

 

 

Такие технические вопросы идеально решает любая нейронка. Вопрос типа напиши процедуру которая на языке TCL получает.....это......из ....этого. Причем с развернутым объяснением что ты даже что нибудь поймешь и сможешь использовать в последующем. 

[an-kval 31]

ИИ частенько ошибаются. Например "галюцинируют". Да, несомненно помогают очень неплохо. Но нельзя отбрасывать и самостоятельное изучение материала. 

[PetkewichAndrej 0]

Спасибо большое за помощь! Буду пробовать реализовать!