From 82d5e42f72c13dde2b169a822201e719d348e3ac Mon Sep 17 00:00:00 2001
From: Avery Adams <oldtechaa@gmail.com>
Date: Thu, 3 Aug 2023 21:31:35 +1200
Subject: Add solution for challenge 1 for Avery Adams week 228

---
 challenge-228/avery-adams/perl/ch-1.pl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 challenge-228/avery-adams/perl/ch-1.pl

diff --git a/challenge-228/avery-adams/perl/ch-1.pl b/challenge-228/avery-adams/perl/ch-1.pl
new file mode 100644
index 0000000000..3bc8b9203a
--- /dev/null
+++ b/challenge-228/avery-adams/perl/ch-1.pl
@@ -0,0 +1,13 @@
+#$/usr/bin/perl
+
+use v5.36;
+
+my %ints;
+foreach (@ARGV) {
+    $ints{$_} = !defined($ints{$_});
+}
+my $total;
+foreach (keys %ints) {
+    $total += $_ if $ints{$_} == 1;
+}
+say $total //= 0;
-- 
cgit