Lines Matching refs:text
2404 my $text = shift;2406 return $text;2408 $text =~ s/\&/\\\\\\amp;/g;2409 $text =~ s/\</\\\\\\lt;/g;2410 $text =~ s/\>/\\\\\\gt;/g;2411 return $text;2417 my $text = shift;2419 return $text;2421 $text =~ s/\\\\\\\\lt:/</g;2422 $text =~ s/\\\\\\\\gt:/>/g;2423 return $text;