summaryrefslogtreecommitdiff
path: root/lzo/util/notime.pl
diff options
context:
space:
mode:
authorArne Schwabe <arne@rfc2549.org>2012-04-16 19:21:14 +0200
committerArne Schwabe <arne@rfc2549.org>2012-04-16 19:21:14 +0200
commit3e4d8f433239c40311037616b1b8833a06651ae0 (patch)
tree98ab7fce0d011d34677b0beb762d389cb5c39199 /lzo/util/notime.pl
Initial import
Diffstat (limited to 'lzo/util/notime.pl')
-rw-r--r--lzo/util/notime.pl26
1 files changed, 26 insertions, 0 deletions
diff --git a/lzo/util/notime.pl b/lzo/util/notime.pl
new file mode 100644
index 00000000..46eb4599
--- /dev/null
+++ b/lzo/util/notime.pl
@@ -0,0 +1,26 @@
+#! /usr/bin/perl
+##
+## vi:ts=4
+##
+##---------------------------------------------------------------------------##
+##
+## Author:
+## Markus F.X.J. Oberhumer <markus@oberhumer.com>
+##
+## Description:
+## Remove timing values from a table created by table.pl
+##
+## Copyright (C) 1996-2008 Markus Franz Xaver Johannes Oberhumer
+##
+##---------------------------------------------------------------------------##
+
+
+while (<>) {
+ if (substr($_,56) =~ /^\s+[\d\.]+\s+[\d\.]+\s+\|\s*\n$/) {
+ substr($_,56) = " 0.000 0.000 |\n";
+ }
+ print;
+}
+
+exit(0);
+