From 58668213eae9356bbcea6a1f75362e97a1e5ce0414241ac6d96ff525233d1a65 Mon Sep 17 00:00:00 2001
From: Sergey Matveev <stargrave@stargrave.org>
Date: Thu, 21 Mar 2024 23:06:48 +0300
Subject: [PATCH] There is $PERL

---
 comment | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/comment b/comment
index 12c953d..a2fc9e4 100755
--- a/comment
+++ b/comment
@@ -11,15 +11,15 @@ 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
-- 
2.48.1