Searched refs:this_line (Results 1 – 3 of 3) sorted by relevance
131 my $this_line = shift (@lines);132 chomp $this_line;134 if ($this_line =~ /^(\s+)/) {146 elsif (($this_line =~ /^(\s*)\*\s+[a-zA-Z0-9]/)147 || ($this_line =~ /^(\s*)\* [a-zA-Z0-9_\.\/\+-]+/)148 || ($this_line =~ /^(\s*)\([a-zA-Z0-9_\.\/\+-]+(\)|,\s*)/)149 || ($this_line =~ /^(\s+)(\S+)/)150 || ($this_line =~ /^(\s*)- +/)151 || ($this_line =~ /^()\s*$/)152 || ($this_line =~ /^(\s*)\*\) +/)[all …]
194 while read this_line; do195 obj_name=`echo "$this_line" | cut -f1`199 echo "$this_line"202 echo "$this_line"207 prev_line=$this_line