#!/bin/sh # Clean up URL address mess left by w3get # should do this in the w3get perl script but it looks like line noise to me. # copies and updates single file if [ $# -eq 0 ] ; then echo "need file(s) to copy fm to cwd" echo "how about ~/tmp/html_get/www.cis.ohio-state.edu/hypertext/faq/usenet/tcl-faq/part1/faq-doc-1.html" exit 1 fi for i in $* do if [ -d $i ] ; then continue fi if [ ! -f $i ] ; then echo "No file $fdir" echo "exiting..." exit 2 fi fto=`basename $i` echo "$fto" sed -e 's^edu:80^edu^g' \ -e 's^HOPS_LOCAL/www.cis.ohio-state.edu/hypertext/faq/usenet/tcl-faq/part^../part^g' \ -e 's^HOPS_LOCAL/www.sco.com^http://www.sco.com^g' \ $i > $fto done