Help for this page

Select Code to Download


  1. or download this
    while ( defined ($_ = <DATA>) ) {
    if (/RULE=$rule/../^END$/) {
...
Y
Z
STMT2=END
  2. or download this
    use strict;

...
Y
Z
END2
  3. or download this
    __OUTPUT__
1: START1
...
2:Z
1:END2
2:END2