#!/usr/bin/perl -w
# Created by Ben Okopnik on Tue Feb 12 07:03:34 CST 2002
exec "links", "www.google.com/advanced_search" unless @ARGV;

my $s = "";
for ( @ARGV ){ s/.*/%22$&%22/ if y/ /+/; $s .= $s?"+$_":"$_"; }

# $ENV{LANG} = "en_US.UTF8";
exec "links", "www.google.com/search?num=30&hl=en&as_qdr=all&q=$s&btnG=Google+Search"