push sheeet

pkgs/development/perl-modules/maatkit/default.nix

@@ -0,0 +1,48 @@
+{
+  buildPerlPackage,
+  lib,
+  fetchurl,
+  DBDmysql,
+}:
+
+buildPerlPackage {
+  pname = "maatkit";
+  version = "7540";
+
+  src = fetchurl {
+    url = "https://storage.googleapis.com/google-code-archive-downloads/v2/code.google.com/maatkit/maatkit-7540.tar.gz";
+    sha256 = "1a7rxrddkrsfxb2wj01ha91ld0vapfkqcy8j9p08l76zz2l8p2v1";
+  };
+
+  outputs = [ "out" ];
+
+  buildInputs = [ DBDmysql ];
+
+  preConfigure = ''
+    find . | while read fn; do
+        if test -f "$fn"; then
+            first=$(dd if="$fn" count=2 bs=1 2> /dev/null)
+            if test "$first" = "#!"; then
+                sed < "$fn" > "$fn".tmp \
+                    -e "s|^#\!\(.*[/\ ]perl.*\)$|#\!$perl/bin/perl $perlFlags|"
+                if test -x "$fn"; then chmod +x "$fn".tmp; fi
+                mv "$fn".tmp "$fn"
+            fi
+        fi
+    done
+  '';
+
+  meta = with lib; {
+    description = "Database toolkit";
+    longDescription = ''
+      You can use Maatkit to prove replication is working correctly, fix
+      corrupted data, automate repetitive tasks, speed up your servers, and
+      much more.
+
+      In addition to MySQL, there is support for PostgreSQL, Memcached, and a
+      growing variety of other databases and technologies.
+    '';
+    license = licenses.gpl2Plus;
+    homepage = "https://code.google.com/archive/p/maatkit/";
+  };
+}