#!/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~&~&amp;~g; s~<~&lt;~g; s~(\r|\r\n|\n)~<BR>\n~g;
s~($protocol:[^$urlender]+[^$urlender$punct])~<A HREF="$1">$1<\/A>~gi;
s~^~<TT>~; s~\0~~g; s~ÿ+~ÿ~g;' $* > $T; /mmach/bin/netscape $T; sleep 360