[emacs]Каталог книг в emacs - bread-library. Он ещё живой?

#!/bin/bash

#LC_ALL=C
export http_proxy="localhost:8118"  # Собираем данные только через Тор
ISBN=$1

link_to_book=$(wget -U "Mozilla/5.0 (Windows NT 5.1; rv:7.0.1) Gecko/20100101 Firefox/7.0.1" -q "http://www.amazon.co.uk/s/ref=nb_sb_noss?url=search-alias%3Dstripbooks&field-keywords=$ISBN&x=8&y=18" -O -| tr "\t\r\n'" '   "' | grep -i -o '<a[^>]\+href[ ]*=[ \t]*"\(ht\|f\)tps\?:[^"]\+"'| grep dp/ | sed -e 's/^.*"\([^"]\+\)".*$/\1/g'|head -1)

wget -U "Mozilla/5.0 (Windows NT 5.1; rv:7.0.1) Gecko/20100101 Firefox/7.0.1" -q "$link_to_book" -O /tmp/$ISBN

echo @book{$ISBN,
sed -n -e 's/.*name="title" content="\(.*\): Amazon.co.uk: \(.*\): Books".*/title = "\1",\nauthor = "\2",/p' -e 's/.*:<\/b> \([0-9]*\) pages.*/pages = "\1",/p' -e 's/.*Publisher:<\/b> \(.*\) .*(.* \([0-9]*\)).*/publisher = "\1",\nyear = "\2",/p'  -e 's/.*ISBN-10:<\/b> \(.*\)<\/li.*/isbn = "\1",/p' -e 's/.*ISBN-13:<\/b> \(.*\)<\/li.*/isbn13 = "\1",/p' /tmp/$ISBN

echo abstract='"'$(cat /tmp/$ISBN | grep -A1 '<div class="productDescriptionWrapper">'| sed -e 's/<[^>]*>//g' -e 's/"//g'|perl -C -pe 's/&\#(\d+);/chr($1)/ge;s/&\#x([a-fA-F\d]+);/chr(hex($1))/ge;' | awk '{print length"\t"$0}'|sort -n|cut -f2- | tail -1)'"',
echo file = '"'"$2"'"'
echo }
rm /tmp/$ISBN

#Convert (hexa)decimal numeric character references to UTF-8
#perl -C -pe 's/&\#(\d+);/chr($1)/ge;s/&\#x([a-fA-F\d]+);/chr(hex($1))/ge;'