Initial version

plugins/other/cpanp_o

@@ -0,0 +1,21 @@
+#!/usr/bin/env perl
+use Modern::Perl;
+
+given ($ARGV[0]) {
+    when ("config") {
+        print <<END;
+graph_title CPAN modules not up to date
+graph_args --base 1000 -l 0
+graph_vlabel modules
+graph_category CPAN
+graph_info The number of installed CPAN modules that aren't up to date
+count.label modules
+count.type GAUGE
+count.info The number of CPAN modules that aren't up to date
+END
+    }
+    default {
+        my $num = () = qx[cpanp -o];
+        say "count.value $num";
+    }
+}