Выделение части имени файла

[shas.1984]

Здравствуйте!
Помогите пожалуйста справиться с задачкой:
Имеется несколько файлов с именами в формате file_xxxx_familia imia otchestvo.ras. Часть имени file у всех одинаковая. xxxx - 4 произвольных, заранее неизвестных символа (только цифры и латинские буквы), familia imia otchestvo - тоже разные. Задача состоит в том, чтобы получить из имени файла часть хххх, найти папку с названием хххх и скопировать в нее этот файл. Весь затык в том, как выделить этот хххх. Подозреваю, что надо использовать stringregexp, но не знаю, как передать ей заранее мне неизвестный pattern.
СПАСИБО!

 

[madmasles]

shas.1984,

$sStr = 'file_xxxx_familia imia otchestvo.ras'
$sSearch = StringRegExpReplace($sStr, 'file_(.+?)_.*', '$1')
ConsoleWrite(@extended & @TAB & $sSearch & @LF)

 

[DarWiM]

shas.1984

Или так:

$sStr = 'file_xxxx_familia imia otchestvo.ras'
$sSearch = StringMid($sStr, 6, 4)
ConsoleWrite($sSearch & @LF)