如何使用批处理从perl返回正则表达式匹配值？

我正在使用批处理执行perl regex命令，如：

perl -p -e "<my regex>" c:\file.txt
PAUSE

perl-p-e“c:\file.txt
暂停

如何告诉perl将其作为可验证文件返回，然后使用批处理echo打印结果

@echo off
for /f "delims=" %%q in ('perl -e"print q{a b c}"') do set var=%%q
echo %var%
pause

或

---

perl脚本将已经打印到STDOUT，您不需要使用echo打印它。当然，我不仅要打印出来，还想在进一步的批处理中使用找到的值。所以我需要从perl中获取它。@membersound，如果您首先说出您真正在做什么，它会很有帮助。好的，这将打印“abc”，但我如何从文件中查找表达式的正则表达式匹配中返回值？

@echo off
for /f "usebackq delims=" %%q in (`perl -e"print 'a b c'"`) do set var=%%q
echo %var%
pause