From 4ef94b3c71bb1c3fee18028a73bd2a03fad858fb Mon Sep 17 00:00:00 2001
From: puskin94 <giovanni.puskin@gmail.com>
Date: Tue, 24 Feb 2015 08:54:43 +0100
Subject: [PATCH] mod and add dist.ini

---
 lib/DDG/Goodie/Rc4.pm     |   7 +-
 share/goodie/rc4/dist.ini | 141 ++++++++++++++++++++++++++++++++++++++
 2 files changed, 145 insertions(+), 3 deletions(-)
 create mode 100644 share/goodie/rc4/dist.ini

diff --git a/lib/DDG/Goodie/Rc4.pm b/lib/DDG/Goodie/Rc4.pm
index 538e651bb..579f608f4 100644
--- a/lib/DDG/Goodie/Rc4.pm
+++ b/lib/DDG/Goodie/Rc4.pm
@@ -35,7 +35,7 @@ handle remainder => sub {
 
     return unless $type && $key && $plaintext;
 
-    if ($type eq "encrypt" || $type eq "en" || $type eq "enc") {
+    if ($type =~ m/en(c|crypt)?/) {
             # To encrypt we receive the plaintext as is and pass it to the RC4 function.
             my $encrypted = RC4($key, $plaintext);
             # To avoid problems with non printable characters, we transform the result using encode_base64()
@@ -43,14 +43,15 @@ handle remainder => sub {
             chomp $result;
             $operation = "Rc4 Encryption";
 
-    }
-    if ($type eq "decrypt" || $type eq "de" || $type eq "dec") {
+    } elsif ($type =~ m/de(c|crypt)?/) {
             #To decrypt we do the reverse process, we take the plaintext, transform it using decode_base64()
             my $decoded = decode_base64($plaintext);
             # Then we pass it to the RC4 funcion to be decrypted.
             $result = RC4($key, $decoded);
             # No need to encode again, this result is show as is.
             $operation = "Rc4 Decryption";
+    } else {
+        return;
     }
 
     return $result,
diff --git a/share/goodie/rc4/dist.ini b/share/goodie/rc4/dist.ini
new file mode 100644
index 000000000..4471a41d3
--- /dev/null
+++ b/share/goodie/rc4/dist.ini
@@ -0,0 +1,141 @@
+name    = DDG-GoodieBundle-OpenSourceDuckDuckGo
+author  = Gabriel Weinberg <yegg@duckduckgo.com>
+author  = Torsten Raudssus <getty@duckduckgo.com>
+author  = Michael Smith <crazedpsyc@duckduckgo.com>
+author 	= Hunter Lang <hunter@duckduckgo.com>
+license = Apache_2_0
+copyright_holder = DuckDuckGo, Inc. L<https://duckduckgo.com/>
+copyright_year   = 2013
+
+[PromptIfStale]
+index = http://duckpan.org
+module = Dist::Zilla::Plugin::UploadToDuckPAN
+
+[Prereqs]
+Time::Duration = 1.1
+MIME::Base64 = 3.13
+MIME::Types = 0
+Roman = 1.23
+Fortune = 0.2
+Math::Int2Base = 1.00
+Data::GUID = 0.046
+IO::All = 0.44
+File::ShareDir::ProjectDistDir = 0.2.0
+Text::FIGlet = 2.19.3
+Text::Unidecode = 0.04
+Date::Calc = 6.3
+Date::Hijri = 0.02
+Date::Jalali2 = 0.04
+Date::Leapyear = 1.72
+; Dates role, et. al.
+DateTime = 0.74
+DateTime::Format::HTTP = 0
+Devel::StackTrace = 0
+Package::Stash = 0
+Try::Tiny = 0
+Lingua::EN::Numericalize = 1.52
+Lingua::PigLatin = 0.01
+Locale::SubCountry = 1.47
+; causing problems because not pp: HTML::Barcode::QRCode = 0.09
+Unicode::Char = 0.02
+Number::UN = 0.002
+Locale::Codes = 3.30
+Gravatar::URL = 1.06
+CGI = 3.60
+Email::Valid = 1.192
+Net::Domain::TLD = 1.70
+Convert::Pluggable = 0.026
+YAML = 0
+Encode = 2.62
+; ParseCron
+Schedule::Cron::Events = 0
+; ColorCodes
+Color::Library = 0
+Convert::Color = 0.08
+Convert::Color::Library = 0.03
+Convert::Braille = 0.05
+Math::Round = 0.06
+Convert::Morse = 0.05
+Net::IDN::Encode = 2.003
+Astro::MoonPhase = 0
+Acme::rafl::Everywhere = 0.008
+Lingua::EN::Numbers::Ordinate = 1.02
+; Hashes
+Digest::SHA = 5.82
+Digest::MD5 = 2.53
+; Factors
+Math::Prime::Util = 0.43
+Games::Sudoku::Component = 0.02
+Data::RandomPerson = 0.4
+Lingua::EN::Words2Nums = 0
+Locale::Currency::Format = 1.30
+Net::IP = 0
+Math::BaseConvert = 0
+Telephony::CountryDialingCodes = 1.04
+URI::Escape::XS = 0.12
+DateTime::Calendar::Chinese = 1.00
+DateTime::Event::Chinese = 1.00
+DateTime::Event::Sunrise = 0
+Geo::Coordinates::DecimalDegrees = 0.09
+Math::SigFigs = 1.09
+Bit::Vector = 7.3
+List::MoreUtils = 0
+; FlipText
+Text::UpsideDown = 1.22
+; Parser BinaryLogic
+Marpa::R2 = 0
+; For pre-fetch Goodies only.
+LWP::Simple = 0
+Business::CUSIP = 1.03
+; Added for SimpleEncryptionService
+Crypt::RC4
+
+[Prereqs / TestRequires]
+Test::EOL = 0
+Test::MockTime = 0
+Test::More = 0.98
+Test::Most = 0
+Test::Dirs = 0.03
+File::Temp = 0.22
+
+[GatherDir]
+[PruneCruft]
+[ManifestSkip]
+[ExtraTests]
+[ExecDir]
+[ShareDir]
+[MakeMaker]
+[Manifest]
+[TestRelease]
+[ConfirmRelease]
+[UploadToDuckPAN]
+[MetaJSON]
+[MetaYAML]
+
+[AutoModuleShareDirs]
+scan_namespaces = DDG::Goodie,DDG::Spice
+sharedir_method = module_share_dir
+
+[Git::NextVersion]
+version_regexp = ^(.+)$
+[PkgVersion]
+[PodSyntaxTests]
+[GithubMeta]
+[Test::EOL]
+trailing_whitespace = 0
+[@Git]
+tag_format = %v
+
+[PodWeaver]
+
+[Git::Push]
+push_to = origin master
+
+[TravisCI]
+perl_version = 5.16
+perl_version = 5.18
+extra_dep = App::DuckPAN
+extra_dep = autodie
+after_install = duckpan DDG
+before_install = sudo apt-get update -qq
+before_install = sudo apt-get install -y libmpfr-dev