diff --git a/en/cgi/ftp.cgi b/en/cgi/ftp.cgi index d8e48ecd7b..2029535f9c 100755 --- a/en/cgi/ftp.cgi +++ b/en/cgi/ftp.cgi @@ -1,9 +1,9 @@ -#!/usr/bin/perl +#!/usr/bin/perl -T # -# $FreeBSD$ +# $FreeBSD: www/en/cgi/ftp.cgi,v 1.3 2000/04/03 08:45:51 phantom Exp $ -require 'cgi-lib.pl'; -require 'cgi-style.pl'; +require './cgi-lib.pl'; +require './cgi-style.pl'; $newloc = "http://www.FreeBSD.org/"; diff --git a/en/cgi/missing_handler.cgi b/en/cgi/missing_handler.cgi index a63f796ed6..d6ffe47910 100755 --- a/en/cgi/missing_handler.cgi +++ b/en/cgi/missing_handler.cgi @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/bin/perl -T # Copyright (c) Juli 1997-2000. Wolfram Schneider <wosch@FreeBSD.org>, Berlin. # All rights reserved. # @@ -52,7 +52,7 @@ # # _________________________________________________________________ # -# $FreeBSD: www/en/cgi/missing_handler.cgi,v 1.6 2000/01/05 15:47:44 phantom Exp $ +# $FreeBSD: www/en/cgi/missing_handler.cgi,v 1.8 2000/10/03 19:50:16 wosch Exp $ # ---------------------------------------------------------------------- # output title @@ -78,7 +78,7 @@ $redirect_url_save =~ s/([^a-zA-Z0-9;\/?:&=])/sprintf("%%%02x",ord($1))/eg; $hsty_base = ''; -require 'cgi-style.pl'; +require './cgi-style.pl'; print &html_header($title); # HTML body diff --git a/en/cgi/query-pr-summary.cgi b/en/cgi/query-pr-summary.cgi index 7d6a8417fb..6cc9a042d1 100755 --- a/en/cgi/query-pr-summary.cgi +++ b/en/cgi/query-pr-summary.cgi @@ -1,5 +1,5 @@ -#!/usr/bin/perl -# $FreeBSD: www/en/cgi/query-pr-summary.cgi,v 1.28 2000/10/29 22:16:41 steve Exp $ +#!/usr/bin/perl -T +# $FreeBSD: www/en/cgi/query-pr-summary.cgi,v 1.29 2000/11/29 13:59:24 wosch Exp $ $html_mode = 1 if $ENV{'DOCUMENT_ROOT'}; $self_ref = $ENV{'SCRIPT_NAME'}; @@ -32,8 +32,8 @@ $closed_too = 0; "low", "l" ); -require "cgi-lib.pl"; -require "cgi-style.pl"; +require "./cgi-lib.pl"; +require "./cgi-style.pl"; require "getopts.pl"; if ($ENV{'QUERY_STRING'} eq 'query') { diff --git a/en/cgi/query-pr.cgi b/en/cgi/query-pr.cgi index 74b6329df7..61231e326c 100755 --- a/en/cgi/query-pr.cgi +++ b/en/cgi/query-pr.cgi @@ -1,5 +1,5 @@ -#!/usr/bin/perl -# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.22 2000/12/05 16:22:14 knu Exp $ +#!/usr/bin/perl -T +# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.23 2000/12/06 07:16:59 ps Exp $ $ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin"; @@ -8,8 +8,8 @@ $ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin"; 'Jul', '07', 'Aug', '08', 'Sep', '09', 'Oct', '10', 'Nov', '11', 'Dec', '12'); -require "cgi-lib.pl"; -require "cgi-style.pl"; +require "./cgi-lib.pl"; +require "./cgi-style.pl"; require "getopts.pl"; &Getopts('p:'); diff --git a/en/cgi/search.cgi b/en/cgi/search.cgi index b3f945e0e5..326eff5470 100755 --- a/en/cgi/search.cgi +++ b/en/cgi/search.cgi @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/bin/perl -T # # mail-archive.pl -- a CGI interface to a wais indexed maling list archive. # @@ -15,7 +15,7 @@ # Disclaimer: # This is pretty ugly in places. # -# $FreeBSD: www/en/cgi/search.cgi,v 1.18 2000/10/28 18:20:39 wosch Exp $ +# $FreeBSD: www/en/cgi/search.cgi,v 1.19 2000/11/05 19:05:43 wosch Exp $ $server_root = '/usr/local/www'; @@ -26,8 +26,8 @@ $searchpage = '/search/search.html'; $myurl = $ENV{'SCRIPT_NAME'}; require "open2.pl"; -require "cgi-lib.pl"; -require "cgi-style.pl"; +require "./cgi-lib.pl"; +require "./cgi-style.pl"; @months = ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec');