annotate bin/google @ 11973:c47f90df9112
draft
<b_jonas> `` perl -pi -e \'/(bf\\(1egobot\\))/ and $_ = "$1 - evaluate brainfuck snippet\\n"\' share/whatis
author |
HackEso <hackeso@esolangs.org> |
date |
Mon, 21 Oct 2019 21:52:10 +0000 |
parents |
e037173e0012 |
children |
|
rev |
line source |
0
|
1 #!/bin/bash
|
|
2 if [ ! "$1" ]
|
|
3 then
|
|
4 echo 'Google what?'
|
|
5 exit 1
|
|
6 fi
|
|
7
|
|
8 QUERY=`echo -n "$1" | od -t x1 -A n -w1000 | tr " " %`
|
|
9
|
|
10 lynx --cfg=/dev/null --lss=/dev/null \
|
|
11 --dump --width=1000 'http://google.com/search?q='"$QUERY" |
|
|
12 grep -A 4 'Search Results' |
|
|
13 tail -n 2
|