comment | 6 +++---

diff --git a/comment b/comment
index 12c953d520928c9f6783ec2ea7ec94d6aaac59305bb7fc5651a4d5c9f31dea5d..a2fc9e4193cd891d6e79d5e9b13cdbf589516d6fd1805b401cca25c58d3ccf79 100755
--- a/comment
+++ b/comment
@@ -11,15 +11,15 @@ [[ -n $1 ]] || usage
 issue=${1#issues/}
 comment=issues/$issue/comment
 
-perl -i -npe 's/^/# /' $comment
+$PERL -i -npe 's/^/# /' $comment
 zmodload -F zsh/stat b:zstat
 zstat -A ctimePrev +ctime $comment
 $EDITOR $comment
 zstat -A ctime +ctime $comment
 [[ $ctime != $ctimePrev ]] || {
     echo Aborting comment >&2
-    perl -i -npe 's/^# //' $comment
+    $PERL -i -npe 's/^# //' $comment
     exit 0
 }
-perl -i -ne 'print if $can; if (/^$/) { $can=1 };' $comment
+$PERL -i -ne 'print if $can; if (/^$/) { $can=1 };' $comment
 git add $comment