From 84e131a68198e85b294c2cc4aaf1faabd2d41e8f Mon Sep 17 00:00:00 2001
From: Roger Bell_West <roger@firedrake.org>
Date: Fri, 7 Jun 2024 11:29:52 +0100
Subject: RogerBW solutions for challenge no. 272

---
 challenge-272/roger-bell-west/ruby/ch-1.rb | 19 +++++++++++++++++++
 challenge-272/roger-bell-west/ruby/ch-2.rb | 27 +++++++++++++++++++++++++++
 2 files changed, 46 insertions(+)
 create mode 100755 challenge-272/roger-bell-west/ruby/ch-1.rb
 create mode 100755 challenge-272/roger-bell-west/ruby/ch-2.rb

(limited to 'challenge-272/roger-bell-west/ruby')

diff --git a/challenge-272/roger-bell-west/ruby/ch-1.rb b/challenge-272/roger-bell-west/ruby/ch-1.rb
new file mode 100755
index 0000000000..82152f9fd3
--- /dev/null
+++ b/challenge-272/roger-bell-west/ruby/ch-1.rb
@@ -0,0 +1,19 @@
+#! /usr/bin/ruby
+
+def defrangip(a)
+  return a.gsub(".", "[.]")
+end
+
+require 'test/unit'
+
+class TestDefrangip < Test::Unit::TestCase
+
+  def test_ex1
+    assert_equal('1[.]1[.]1[.]1', defrangip('1.1.1.1'))
+  end
+
+  def test_ex2
+    assert_equal('255[.]101[.]1[.]0', defrangip('255.101.1.0'))
+  end
+
+end
diff --git a/challenge-272/roger-bell-west/ruby/ch-2.rb b/challenge-272/roger-bell-west/ruby/ch-2.rb
new file mode 100755
index 0000000000..f198380624
--- /dev/null
+++ b/challenge-272/roger-bell-west/ruby/ch-2.rb
@@ -0,0 +1,27 @@
+#! /usr/bin/ruby
+
+def stringscore(a)
+  out = 0
+  a.chars.each_cons(2) do |c|
+    out += (c[0].ord() - c[1].ord()).abs
+  end
+  out
+end
+
+require 'test/unit'
+
+class TestStringscore < Test::Unit::TestCase
+
+  def test_ex1
+    assert_equal(13, stringscore('hello'))
+  end
+
+  def test_ex2
+    assert_equal(30, stringscore('perl'))
+  end
+
+  def test_ex3
+    assert_equal(37, stringscore('raku'))
+  end
+
+end
-- 
cgit