From 2f12a938a81740dd0631fb917ca5667e190c098e Mon Sep 17 00:00:00 2001
From: Urmish Shah <33273194+surmish@users.noreply.github.com>
Date: Sun, 1 Dec 2024 18:02:17 -0800
Subject: [PATCH] file print string needs to be a separate placeholder (#508)

---
 snippets/perl.json | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/snippets/perl.json b/snippets/perl.json
index c45b5013..807dc2ad 100644
--- a/snippets/perl.json
+++ b/snippets/perl.json
@@ -92,7 +92,7 @@
   },
   "print to file": {
     "prefix": "file print",
-    "body": ["print \\$${1:fh} \"${1:string}\\n\";"]
+    "body": ["print \\$${1:fh} \"${2:string}\\n\";"]
   },
   "read file into a scalar": {
     "prefix": "slurp",