Lines Matching refs:desc

276 		my $desc = $data{$what}->{description};
277 		$desc =~ s/^\s+//;
280 		$desc =~ s/\n[\-\*\=\^\~]+\n/\n/g;
282 		if (!($desc =~ /^\s*$/)) {
283 			if ($desc =~ m/\:\n/ || $desc =~ m/\n[\t ]+/  || $desc =~ m/[\x00-\x08\x0b-\x1f\x7b-\xff]/) {
285 				$desc =~ s/\n/\n /g;
288 				print " $desc\n\n";
291 				$desc =~s/([\x00-\x08\x0b-\x1f\x21-\x2a\x2d\x2f\x3c-\x40\x5c\x5e-\x60\x7b-\xff])/\\$1/g;
293 				print "$desc\n\n";
342 		my $desc = $data{$what}->{description};
348 		$desc =~ s/^\s+//;
355 		print "Description:\n\n$desc";