Lines Matching refs:content
70 my ($content) = @_;
72 my $cr = () = $content =~ /\r/g;
73 my $lf = () = $content =~ /\n/g;
98 my $content = do { local $/; <$fh> };
104 $content =~ /\t/) {
108 my $eol = eol_detect($content);
120 if ($eol ne "lf" && $content ne "" &&
127 $content =~ /[ \t]\n/) {
131 if ($content ne "" &&
133 $content !~ /\n\z/) {
137 if ($content =~ /\n\n\z/ ||
138 $content =~ /\r\n\r\n\z/) {
