Lines Matching refs:inside
44 my $inside=0;
49 # print "$inside: $_";
50 if(!$inside && ($_ =~ /^ *\<$section/)) {
51 $inside++;
53 if((1 ==$inside) && ( ($_ =~ /^ *\<$part([^>]*)/) ||
56 $inside++;
67 elsif((1 ==$inside) && ($_ =~ /^ *\<\/$section\>/)) {
70 elsif((2 ==$inside) && ($_ =~ /^ *\<\/$part/)) {
71 $inside--;
81 my $inside=0;
87 # print "$inside: $_";
88 if(!$inside && ($_ =~ /^ *\<$section/)) {
89 $inside++;
91 elsif((1 ==$inside) && ($_ =~ /^ *\<$part[ \>]/)) {
96 $inside++;
98 elsif((2 ==$inside) && ($_ =~ /^ *\<\/$part/)) {
99 $inside--;
101 elsif((1==$inside) && ($_ =~ /^ *\<\/$section/)) {
117 elsif(2==$inside) {