Help for this page
RULE=test BEGIN ... Y Z STMT2=END
open (RULE, "$rulefile") || die "Can't open $rulefile for reading $!\n +"; while ( defined ($_ = <RULE>) ) { if (/RULE=$rule/../^END$/) { ... B C ...