Как сопоставить слово, окруженное пробелами ИЛИ в конце / начале строки, используя регулярное выражение Perl?
Я хочу найти последовательности, соответствующие моему регулярному выражению, если они находятся в середине строки, окруженные пробелами, в конце или в начале или являются единственной вещью в строке.
Пример: Позволять'Предположим последовательность'qwe45rty'
это то, что мы ищем. Я хочу быть в состоянии получить позитив на все эти строки:
'qwe45rty'
'qwe45rty blabla'
'smth qwe45rty blabla'
'smth qwe45rty'
' qwe45rty '
Но ни один из них:
'aaqwe45rty'
'qwe45rtybb'
'aaqwe45rtybb'
Лучшее, что я придумал, это что-то вроде этого:
if ( ($a =~ /\s+$re\s+/) or
($a =~ /^$re\s+/) or
($a =~ /\s+$re$/) or
($a =~ /^$re$/) )
{
# do stuff
}
которые могут'это лучший способ сделать это :)
Какие-либо предложения?