mediawiki-extensions-Math/texvccheck/test.pl

#! /usr/bin/perl
my $texvc = `texvc '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;
if (substr($result,0,1) eq "+") {
	print "good";
} else {
	print "bad";
}
print $result;
my $ = `tex2svg '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;
Fix perl script permissions and shebang Bug: T104050 Change-Id: I19767efd410f04deb7ac6b122427d630735d778a 2015-07-01 13:07:07 +00:00			`#! /usr/bin/perl`
Breakdown of texvc texvc had several tasks in the past: 1 checking the input 2 convert MediaWiki custom syntax to standard LaTeX 3 run LaTeX 4 convert dvi2png This change provides a simplified version that performs only steps 1+2. This is required to avoid security problems with tools like MathJax, especially if these tools are run at the server-side. Bug: 54624 Change-Id: I1650e6ec2ccefff6335fbc36bbe8ca8f59db0faa 2013-10-20 12:51:34 +00:00			my $texvc = `texvc '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;
			`if (substr($result,0,1) eq "+") {`
			`print "good";`
			`} else {`
			`print "bad";`
			`}`
			`print $result;`
Fix perl script permissions and shebang Bug: T104050 Change-Id: I19767efd410f04deb7ac6b122427d630735d778a 2015-07-01 13:07:07 +00:00			my $ = `tex2svg '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;