#!/bin/sh
T=${1-/tmp/textview$$}.html; trap "exec rm -f $T" 0 1 2 3 15
/usr/local/bin/perl -pe '$urlender="][\"`'\''><\\s"; $punct=").,:;\?";
$protocol="(https?|file|ftp|gopher|wais|s?news|nntp|finger|telnet|rlogin)";
s~&~&~g; s~<~<~g; s~(\r|\r\n|\n)~
\n~g;
s~($protocol:[^$urlender]+[^$urlender$punct])~$1<\/A>~gi;
s~^~~; s~\0~~g; s~ÿ+~ÿ~g;' $* > $T; /mmach/bin/netscape $T; sleep 360