From: Emil Williams <emilemilemil@cock.li>
Date: Tue, 6 May 2025 18:57:14 +0000 (-0600)
Subject: --
X-Git-Url: https://git.xolatile.top/?a=commitdiff_plain;h=0916ab1fb46193f1b7366f0dc5aadc58897b0e14;p=emil-3chen.org.git

--
---

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 36d9943..62db717 100644
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -44,8 +44,9 @@ sub preinit {
 
     sub sitename {
         use Cwd;
-        $_ = getcwd();
-        return s/.*\///;
+        my $sitename = getcwd();
+        $sitename =~ s/.*\///;
+        return $sitename;
     }
 
     sub debug {