The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
TPEDERSE / Text-SenseClusters-1.03 / Testing / vector / order2vec / test-B2.regex 
/\s(<[^>]*>)*<sat id="call_for\.068:0">for<\/sat>(<[^>]*>)*\s/ @name = <sat id="call_for.068:0">for</sat>
/\s(<[^>]*>)*mail(<[^>]*>)*\s/ @name = mail
/\s(<[^>]*>)*voice(<[^>]*>)*\s/ @name = voice
/\s(<[^>]*>)*instruments(<[^>]*>)*\s/ @name = instruments
/\s(<[^>]*>)*usual(<[^>]*>)*\s/ @name = usual
/\s(<[^>]*>)*minister(<[^>]*>)*\s/ @name = minister
/\s(<[^>]*>)*zambia(<[^>]*>)*\s/ @name = zambia
/\s(<[^>]*>)*item(<[^>]*>)*\s/ @name = item
/\s(<[^>]*>)*pentagon(<[^>]*>)*\s/ @name = pentagon
/\s(<[^>]*>)*agreement(<[^>]*>)*\s/ @name = agreement
/\s(<[^>]*>)*prime(<[^>]*>)*\s/ @name = prime
/\s(<[^>]*>)*overloud(<[^>]*>)*\s/ @name = overloud
/\s(<[^>]*>)*father(<[^>]*>)*\s/ @name = father
/\s(<[^>]*>)*line(<[^>]*>)*\s/ @name = line
/\s(<[^>]*>)*<head>chairs<\/head>(<[^>]*>)*\s/ @name = <head>chairs</head>
/\s(<[^>]*>)*dozen(<[^>]*>)*\s/ @name = dozen
/\s(<[^>]*>)*ordinary(<[^>]*>)*\s/ @name = ordinary
/\s(<[^>]*>)*president(<[^>]*>)*\s/ @name = president
/\s(<[^>]*>)*hawke(<[^>]*>)*\s/ @name = hawke