Нахождение смежных терминов

Question

У меня есть строка:

Str1 = "Confidential Design No. PXB1235GHYZ9" 

Эта строка может также возникнуть в приведенных ниже вариантах:

Str2 = "Confidential Design No PXB1235GHYZ9" 

("" уведомление не рядом нет) ИЛИ

Str3 = "Confidential Design PXB1235GHYZ9" 

Учитывая ключевое слово, дизайн, мне нужно извлечь PXB1235GHYZ9. Этот термин всегда имеет длину 12 символов и всегда представляет собой смесь альфой и чисел.

Как написать общий скрипт для обработки всех трех сценариев с помощью RegEx/Perl? Должен ли я разделить их, используя пробел, а затем проверить каждый термин? Или есть более простой способ, которым я могу извлечь «PXB1235GHYZ9», данный Design во всех трех сценариях?

Answer 1

$str =~ /Confidential Design (No\.?)?([A-Z0-9]{12})/; 

Срок будет равен 2 долларам США.

Answer 2

насчет:

$str =~ /Design +(?:No\.? +)?([A-Za-z0-9]{12})/; 

чеках для Design, необязательно с последующим No или No., а затем 12 букв и цифр (я предполагаю, что ваш код-вещи буквенно-цифровой), все разделены одним или несколькими пробелами. Код будет в $1.