Распечатать группу захвата первого матча и выйти

Question

Я пытаюсь получить первую группу захвата первого совпадения из конвейерного ввода в perl.Например, здесь печатаются все совпадения:

$ printf "hello\nworld" | perl -nle 'print "$1" if m/([a-z]o)/'
lo
wo

Однако

$ printf "hello\nworld" | perl -nle 'print "$1" && exit if m/([a-z]o)/'

Не работает.Как я могу получить первый матч?

Answer 1

заменить && на and

print "$1" and exit if m/([a-z]o)/