#!/usr/bin/perl
#
# Generer et lite søke interface mot www.dejanews.com. A.Vonheim 05/98
#
# Bruk:
# soc.culture.lebanon
#
print "Content-type: text/html\n\n";
$group = $ENV{'QUERY_STRING'};
while( ) {
s/\$group/$group/;
print;
}
__DATA__
Browse dejanews
|
Search for $group usenet articles.
|
(This is a gateway to
www.dejanews.com.)
al@mashriq
980512