Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sourceware.org/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
Message-ID: <41648148.F7926E55@dessent.net>
Date: Wed, 06 Oct 2004 16:35:36 -0700
From: Brian Dessent <brian AT dessent DOT net>
Organization: My own little world...
MIME-Version: 1.0
To: cygwin AT cygwin DOT com
Subject: Re: Mailing list redirection etiquette?
References: <NUTMEGzYFfa5hr6fGny000002d7 AT NUTMEG DOT CAM DOT ARTIMI DOT COM> <Pine DOT GSO DOT 4 DOT 61 DOT 0410061338090 DOT 24166 AT slinky DOT cs DOT nyu DOT edu>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-IsSubscribed: yes
Reply-To: cygwin AT cygwin DOT com

Igor Pechtchanski wrote:

> google () {
>     url="http://www.google.com/search?q=`echo -n $*|perl -mCGI -pe '$_=CGI::escape($_)'`";
>     echo "Starting: $url"; cygstart -o "$url" >/dev/null
> }

You can remove dependence on CGI.pm by using

google () {
    url="http://www.google.com/search?q=`echo -n $* | \
      perl -pe 's/([^\w()\x27*~!.-])/sprintf "%%%02x", ord $1/eg'`";
    echo "Starting: $url"; cygstart -o "$url" >/dev/null
}

Brian

(oh and you'd want -MCGI not -mCGI if you want to use the module)

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/