From d79e2212cae1c29dbc4b3107c273453e01916dc8 Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Fri, 13 Jun 2003 02:11:16 +0000
Subject: [PATCH] *** empty log message ***

---
 ts/ts.pl | 8 ++++++++
 ts/ts.sh | 6 ++++++
 2 files changed, 14 insertions(+)
 create mode 100644 ts/ts.pl
 create mode 100644 ts/ts.sh

diff --git a/ts/ts.pl b/ts/ts.pl
new file mode 100644
index 0000000..1a55fa9
--- /dev/null
+++ b/ts/ts.pl
@@ -0,0 +1,8 @@
+#!/usr/bin/perl -wT
+use strict;
+use POSIX;
+while (<>) {
+    chomp;
+    $now = strftime('%Y-%m-%dT%H:%M:%S', localtime);
+    print "$now $_\n";
+}
diff --git a/ts/ts.sh b/ts/ts.sh
new file mode 100644
index 0000000..8770150
--- /dev/null
+++ b/ts/ts.sh
@@ -0,0 +1,6 @@
+#!/bin/sh
+while read a 
+do
+    x=$(date '+%Y-%m-%dT%H:%M:%S')
+    echo "$x $a"
+done