good_password added. Tracefile man page.

Makefile

@@ -1,4 +1,4 @@
-all: blink/blink.1 histogram/histogram.1 upsidedown/upsidedown.1
+all: blink/blink.1 histogram/histogram.1 upsidedown/upsidedown.1 tracefile/tracefile.1
 
 blink/blink.1: blink/blink
 	pod2man blink/blink > blink/blink.1
@@ -9,6 +9,9 @@ histogram/histogram.1: histogram/histogram
 upsidedown/upsidedown.1: upsidedown/upsidedown
 	pod2man upsidedown/upsidedown > upsidedown/upsidedown.1
 
+tracefile/tracefile.1: tracefile/tracefile.pod
+	pod2man tracefile/tracefile.pod > tracefile/tracefile.1
+
 install:
 	parallel ln -sf `pwd`/{}/{} /usr/local/bin/{} ::: blink reniced em field forever neno rn stdout tracefile w4it-for-port-open upsidedown histogram
 	parallel ln -sf `pwd`/{} /usr/local/share/man/man1/{/} ::: */*.1

good_password/good_password

@@ -0,0 +1,34 @@
+#!/usr/bin/perl
+
+# This program generates passwords that:
+#
+# * are hard to guess
+# * will be displayed unambigously in any (normal) font
+# * will survive being passed through a bad fax machine
+# * has UPPER lower number and sign
+#
+# Too close: B8 cC g9 kK lI l1 oO O0 pP sS uU vV xX zZ ,. :; `' S5
+# Causes problems in URLs: @/:
+# Causes problems in shell: ! " # $ & ( ) [ ] { } ? | < > \ *
+# SQL uses: % for wildcard
+# Hard to type: ^ ~ ¨ ¤ § ½ æ ø å Æ Ø Å
+# Never 2 same chars next to eachother. (--) is bad
+
+my $pw;
+my @chars=split //, 'abdefhijmnqrtyADEFGHJLMNQRTY23467=+-';
+do { 
+    $pw = "";
+    for (1..12) {
+	do {
+	    # avoid double chars (such as --)
+	    $this = $chars[rand $#chars+1]
+	} while($last eq $this);
+	$last = $this;
+	$pw .= $this;
+    }
+} while (not($pw =~ /[A-Z]/ and
+	     $pw =~ /[a-z]/ and
+	     $pw =~ /[0-9]/ and
+	     $pw =~ /[^a-zA-Z0-9]/));
+
+print "$pw\n";

histogram/histogram

@@ -2,7 +2,7 @@
 
 =head1 NAME
 
-histogram - make a histogram on the command line
+histogram - make and display a histogram on the command line
 
 =head1 SYNOPSIS
 
@@ -110,7 +110,12 @@ git log --format=%ai | cut -d\  -f1 | uniq -c | histogram -b --post
 
 =head1 EXAMPLE: git: commits by hour of the day
 
-git log --pretty=format:'%ai' | perl -pe 's/.* (\d\d):.*/$1/' | sort  -n | uniq -c | histogram -b
+git log --format=%ai | perl -pe 's/.* (\d\d):.*/$1/' | sort  -n | uniq -c | histogram -b
+
+
+=head1 EXAMPLE: git: commits by day of the week
+
+git log --format=%ad |cut -d\  -f1 | sort  -n | uniq -c | histogram -b       
 
 
 =head1 EXAMPLE: run time of processes

tracefile/tracefile

@@ -1,34 +1,5 @@
 #!/bin/bash
 
-# NAME
-#        tracefile - list files being accessed
-#
-# SYNOPSIS
-#        tracefile [-aenu] command
-#
-# DESCRIPTION
-#        tracefile will print the files being accessed by the command.
-#
-# OPTIONS
-#        -a   List all files.
-#
-#        -e   List only existing files.
-#
-#        -n   List only non-existing files.
-#
-#        -u   List only files once.
-#
-# AUTHOR
-#        Ole Tange <tange@gnu.org>
-#
-# COPYRIGHT
-#        Copyright © 2012 Free Software Foundation, Inc.  License
-#        GPLv3+: GNU GPL version 3 or later
-#        <http://gnu.org/licenses/gpl.html>.  This is free software: you
-#        are free to change and redistribute it.  There is NO WARRANTY,
-#        to the extent permitted by law.
-
-
 export _EXISTS=0
 export _NONEXISTS=0
 export _UNIQUE=0

tracefile/tracefile.pod

@@ -0,0 +1,175 @@
+#!/usr/bin/perl
+
+=head1 NAME
+
+tracefile - list files being accessed
+
+=head1 SYNOPSIS
+
+B<tracefile> [-aenu] I<command>
+
+=head1 DESCRIPTION
+
+B<tracefile> will print the files being accessed by the command.
+
+=head1 OPTIONS
+
+=over 9
+
+=item I<command>
+
+Command to run.
+
+
+=item B<-a>
+
+List all files.
+
+
+=item B<-e>
+
+List only existing files.
+
+
+=item B<-n>
+
+List only non-existing files.
+
+
+=item B<-u>
+
+List only files once.
+
+=back
+
+
+=head1 REPORTING BUGS
+
+Report bugs to <tange@gnu.org>.
+
+
+=head1 AUTHOR
+
+Copyright (C) 2012 Ole Tange, http://ole.tange.dk and Free
+Software Foundation, Inc.
+
+
+=head1 LICENSE
+
+Copyright (C) 2012 Free Software Foundation, Inc.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 3 of the License, or
+at your option any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+=head2 Documentation license I
+
+Permission is granted to copy, distribute and/or modify this documentation
+under the terms of the GNU Free Documentation License, Version 1.3 or
+any later version published by the Free Software Foundation; with no
+Invariant Sections, with no Front-Cover Texts, and with no Back-Cover
+Texts.  A copy of the license is included in the file fdl.txt.
+
+=head2 Documentation license II
+
+You are free:
+
+=over 9
+
+=item B<to Share>
+
+to copy, distribute and transmit the work
+
+=item B<to Remix>
+
+to adapt the work
+
+=back
+
+Under the following conditions:
+
+=over 9
+
+=item B<Attribution>
+
+You must attribute the work in the manner specified by the author or
+licensor (but not in any way that suggests that they endorse you or
+your use of the work).
+
+=item B<Share Alike>
+
+If you alter, transform, or build upon this work, you may distribute
+the resulting work only under the same, similar or a compatible
+license.
+
+=back
+
+With the understanding that:
+
+=over 9
+
+=item B<Waiver>
+
+Any of the above conditions can be waived if you get permission from
+the copyright holder.
+
+=item B<Public Domain>
+
+Where the work or any of its elements is in the public domain under
+applicable law, that status is in no way affected by the license.
+
+=item B<Other Rights>
+
+In no way are any of the following rights affected by the license:
+
+=over 2
+
+=item *
+
+Your fair dealing or fair use rights, or other applicable
+copyright exceptions and limitations;
+
+=item *
+
+The author's moral rights;
+
+=item *
+
+Rights other persons may have either in the work itself or in
+how the work is used, such as publicity or privacy rights.
+
+=back
+
+=back
+
+=over 9
+
+=item B<Notice>
+
+For any reuse or distribution, you must make clear to others the
+license terms of this work.
+
+=back
+
+A copy of the full license is included in the file as cc-by-sa.txt.
+
+=head1 DEPENDENCIES
+
+B<tracefile> uses Perl, and B<strace>.
+
+
+=head1 SEE ALSO
+
+B<strace>(1)
+
+=cut
+