Adding Lowercase.pm

lib/DDG/Goodie/Lowercase.pm

@@ -0,0 +1,24 @@
+package DDG::Goodie::Lowercase;
+use DDG::Goodie;
+
+# ABSTRACT: Convert a string into lowercase.
+name "Lowercase";
+description "Convert a string into lowercase.";
+primary_example_queries "lowercase GitHub";
+secondary_example_queries "lower case GitHub";
+category 'conversions';
+topics 'programming';
+code_url 'https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/lib/DDG/Goodie/Lowercase.pm';
+attribution github  => ["DavidMascio"];
+
+zci is_cached => 1;
+zci answer_type => "lowercase";
+
+triggers start => 'lowercase', 'lower case';
+
+handle remainder => sub {
+    return lc $_ if $_;
+    return;
+};
+
+1;

t/Lowercase.t

@@ -0,0 +1,24 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use DDG::Test::Goodie;
+
+zci answer_type => 'lowercase';
+zci is_cached => 1;
+
+ddg_goodie_test(
+    [
+        'DDG::Goodie::Lowercase'
+    ],
+    'lowercase foo' =>
+        test_zci('foo'),
+    'lower case foO' =>
+        test_zci('foo'),
+    'lowercase john Doe' =>
+        test_zci('john doe'),
+);
+
+done_testing;