tdroadmap_merger/gettd.pl
changeset 69 6a685c67fb1f
parent 68 4ed9a3a59ef8
equal deleted inserted replaced
68:4ed9a3a59ef8 69:6a685c67fb1f
   219 	if ($mypkg =~ m/index\.php\/(.*?) HTTP/sg) {
   219 	if ($mypkg =~ m/index\.php\/(.*?) HTTP/sg) {
   220   
   220   
   221 		$pagename = $1;
   221 		$pagename = $1;
   222 		print "INFO -Processing Package $pagename \n";
   222 		print "INFO -Processing Package $pagename \n";
   223 		$i=0;
   223 		$i=0;
   224 		
   224 		if ($mypkg =~m/class\=\"bugzilla sortable\"/sg ) { $headerformat="autobug_format"; }
   225 		while ($mypkg =~ m/\<tr.*?\>(.*?)\<\/tr/sg) {
   225 		
       
   226 		while ($mypkg =~ m/\<tr.*?\>(.*?)\<\/tr/sg) { 
   226 			$myheader= $&;
   227 			$myheader= $&;
   227       if ($myheader =~ m/style=\"background-color\:/sg) {
   228       if ($myheader =~ m/style=\"background-color\:/sg) {
   228         if ($myheader =~ m/Bug ID/sg) { $headerformat="bugzilla_format";}
   229         if ($myheader =~ m/Bug ID/sg) { $headerformat="bugzilla_format";}
   229         next;
   230         next;
   230       }
   231       }