admin scripts I use.

webtools/tinderbox2/src/bin/processmail_null

@@ -0,0 +1,49 @@
+#!#perl# #perlflags# --
+# -*- Mode: perl; indent-tabs-mode: nil -*-
+#
+
+# processmail_null - A null mail handler for throwing out mail instead
+# of delivering it.
+
+
+# $Revision: 1.1 $ 
+# $Date: 2001/11/14 21:24:32 $ 
+# $Author: kestes%walrus.com $ 
+# $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/bin/processmail_null,v $ 
+# $Name:  $ 
+
+
+# The contents of this file are subject to the Mozilla Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is the Tinderbox build tool.
+#
+# The Initial Developer of the Original Code is Netscape Communications
+# Corporation. Portions created by Netscape are
+# Copyright (C) 1998 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+
+# complete rewrite by Ken Estes:
+#	 kestes@staff.mail.com Old work.
+#	 kestes@reefedge.com New work.
+#	 kestes@walrus.com Home.
+# Contributor(s): 
+
+
+
+# --------------------main-------------------------
+{
+    
+    undef $/;
+    my $message = <>;
+
+    exit 0;
+}

webtools/tinderbox2/src/clientbin/show_time

@@ -0,0 +1,11 @@
+#!/usr/bin/perl
+
+$t=time();
+
+print (
+       "The current time on ".`hostname`. "\n".
+       "UnixTime: ".$t."\n".
+       "LocalTime: ".localtime($t)."\n".
+       "GMTime: ".gmtime($t)."\n".
+       "\n"
+	       );