log bin/seen2 @ 1636:7f484425d5b9

age author description
Tue, 22 Jan 2013 13:55:02 +0000 HackBot <fizzie> head -n 1 < bin/seen > bin/seen2
Tue, 22 Jan 2013 13:54:20 +0000 HackBot <fizzie> echo \'$n=shift @ARGV; $n=~s/ *$//; $c="ls -r /var/irclogs/_esoteric/????-??-??.txt"; $c.=" | head -n 30" unless (shift @ARGV) eq "ever"; @f=split /\\s+/, `$c`; for $f (@f) { open F,"<$f"; @l=grep(/^..:..:..: <$n>/i,<F>); close F; if (@l) { $b=$f; $b=~s#.*/(.*?).txt#$1#; print "$b $l[-1]"; exit 1; } } print "not lately";\' >> bin/seen2
Tue, 22 Jan 2013 13:54:04 +0000 HackBot <fizzie> head -n 1 < bin/seen > bin/seen2
Tue, 22 Jan 2013 10:26:15 +0000 HackBot <fizzie> sed -i -e \'s/n 5/n 30/\' bin/seen2
Tue, 22 Jan 2013 10:23:33 +0000 HackBot <fizzie> echo \'$n=shift @ARGV; $n=~s/ *$//; @f=split /\\s+/, `ls -r /var/irclogs/_esoteric/????-??-??.txt | head -n 5`; for $f (@f) { open F,"<$f"; @l=grep(/^..:..:..: <$n>/i,<F>); close F; if (@l) { $b=$f; $b=~s#.*/(.*?).txt#$1#; print "$b $l[-1]"; exit 1; } } print "not lately";\' >> bin/seen2
Tue, 22 Jan 2013 10:23:29 +0000 HackBot <fizzie> echo \'#! /usr/bin/env perl\' > bin/seen2
Tue, 22 Jan 2013 10:07:02 +0000 HackBot <fizzie> cp bin/seen bin/seen2
Tue, 22 Jan 2013 10:03:16 +0000 HackBot <fizzie> sed -i -e \'s/END/BEGIN{IGNORECASE=1} END/\' bin/seen2
Tue, 22 Jan 2013 10:02:18 +0000 HackBot <fizzie> cp bin/seen bin/seen2
Tue, 22 Jan 2013 09:53:23 +0000 HackBot <fizzie> sed -i -e \'s/$1/${1% }/\' bin/seen2
Tue, 22 Jan 2013 09:52:55 +0000 HackBot <fizzie> cp bin/seen bin/seen2