Fråga : Förneka av existerande stränger insida av RegEx

Hi behov för

I att bygga en RegEx, var stränga ska efter, finnas: behov för abc-section

I för
perform för

PERFORM XYZ-SECTION
or att utesluta detta:

perform varierande i1 från 1 vid 1
or
PERFORM VARIERANDE I1 FRÅN 1 VID 1

All case-insensitive.

I grundar exemplen över med den follwing RegExen:
$line=~ m/^. {6} \ s+PERFORM \ s+ (\ S+) ($|\ s|\. /i

But med den givna RegExen I grundar öglan ”utför varierande” för. Hur denna RegEx man uteslutar Perlen för loops.
Using som språket för min RegEx.
" klar "

Svar : Förneka av existerande stränger insida av RegEx

1:	$line=~ m/^. {6} \ s+PERFORM \ s+ (?! varierande) (\ S+) ($|\ s|\. /i