solenv/bin/make_ext_update_info.pl

202         my $orig = $parser->original_string();
206         $orig=~/(\s*<)(.*?)\s/x;
240                 $orig=~/(\s*<)(.*)/x;
245         $fullString = $orig unless $fullString;
285         my $orig = $parser->original_string();
287         if ($orig && $prefix) {
288             $orig=~/(\s*<\/)(.*)/x;
289             $orig= $1.$prefix.":".$2;
291         print $FH $orig;
338         my $orig = $parser->original_string();
339         $orig=~/(\s*<)(.*?)\s/x;