use MT::Template::Context;
MT::Template::Context->add_global_filter(ntriples => \&ntriples);

sub ntriples {
	my ($text,$val,$ctx) = shift;
	my $ret = "";
	foreach my $line (split /\n/,$text) {
		chomp $line;
		if($line =~ /<(.*?)> "(.*)" \./) {
			$ret .= "<$1>".$2."</$1>\n";
		}
		if($line =~ /<(.*?)> <(.*)> \./) {
			$ret .= "<$1 rdf:resource=\"$2\" />\n";
		}
	}
	return $ret;
}
1;