diff --git a/texvccheck/test.pl b/texvccheck/test.pl
old mode 100644
new mode 100755
index 343ee56..898032d
--- a/texvccheck/test.pl
+++ b/texvccheck/test.pl
@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl
+#! /usr/bin/perl
 my $texvc = `texvc '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;
 if (substr($result,0,1) eq "+") {
 	print "good";
@@ -6,4 +6,4 @@ if (substr($result,0,1) eq "+") {
 	print "bad";
 }
 print $result;
-my $ = `tex2svg '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;
\ No newline at end of file
+my $ = `tex2svg '\\sin(x)+{}{}\\cos(x)^2 newcommand'`;