Mercurial > hg > batmud > misc
changeset 226:92cbb05f66a6 misc
Specify input logfile for findundone shell script.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Fri, 23 Dec 2011 02:24:19 +0200 |
| parents | 89088c883aa7 |
| children | c88f0ebda59a |
| files | nun/tasks/findundone.sh |
| diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/nun/tasks/findundone.sh Fri Dec 23 02:24:01 2011 +0200 +++ b/nun/tasks/findundone.sh Fri Dec 23 02:24:19 2011 +0200 @@ -1,6 +1,13 @@ #!/bin/sh + +if test "x$1" = "x"; then + echo "Usage: $0 <logfile>" + exit 0 +fi + + TMPFILE=`mktemp -t findundone-$USER.XXXXXXXXXX` || exit 1 -LOGFILE="$HOME/tiny.log" +LOGFILE="$1" echo "Searching logfile '$LOGFILE' for finished tasks ... " tail -500 "$LOGFILE" | perl -e 'my @tmp; while (<STDIN>) { if(/^ \| ([A-Z][^|]+)\| \[ \:. \]/) { $s = $1; $s =~ s/ *$//; push(@tmp,$s); }} print "$_\n" foreach (sort { $a cmp $b} @tmp); print STDERR "Found ".(scalar @tmp)." tasks.\n";' > "$TMPFILE"