#! /bin/sh
test ! $1 && echo "Usage: webpngize <directory>"
cd $1

for html in `find . -type f -name '*.html'`; do
    echo $html
    perl -i\
    -p0e "s/(<img\s.*?src=)(['\"]?)(.*?)\.gif\2/\$1\$2\$3.png\$2/gi" $html
done

for gif in `find . -type f -name '*.gif'`; do
    echo $gif
    convert $gif `basename $gif .gif`.png
    rm $gif
done