BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-require 'CGI';
-require 'My::Project';
+require CGI;
+Wrequire 'My::Project';
my $W=My::Web->init(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
use Apache::Constants qw(HTTP_NO_CONTENT);
-require "Mail::Send";
+require Mail::Send;
my $W=My::Web->init(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::AutoGen::ListItem;
+Wuse 'My::Project';
+Wuse 'project::AutoGen::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::CasioA::ListItem;
+Wuse 'My::Project';
+Wuse 'project::CasioA::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::FordFulk::ListItem;
+Wuse 'My::Project';
+Wuse 'project::FordFulk::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::Heat::ListItem;
+Wuse 'My::Project';
+Wuse 'project::Heat::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-require 'CGI';
-require 'My::Project';
+require CGI;
+Wrequire 'My::Project';
use constant ENTRIES=>"CVS/Entries";
use constant ENTRIES_LOG=>"CVS/Entries.Log";
my %item;
for my $dir (keys(%dirs)) {
- require "project::${dir}::ListItem";
+ Wrequire "project::${dir}::ListItem";
my $item=eval('\@project::'.$dir.'::ListItem::ListItem');
do { warn "Broken project/$dir/ListItem.pm"; next; } if !defined $item;
$item{$dir}={ My::Project::project_arr_to_hash(@$item) };
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::Islet::ListItem;
+Wuse 'My::Project';
+Wuse 'project::Islet::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::LaserGame::ListItem;
+Wuse 'My::Project';
+Wuse 'project::LaserGame::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::Nokia61::ListItem;
+Wuse 'My::Project';
+Wuse 'project::Nokia61::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::PortDiag::ListItem;
+Wuse 'My::Project';
+Wuse 'project::PortDiag::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::ShortRel::ListItem;
+Wuse 'My::Project';
+Wuse 'project::ShortRel::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::TraceFS::ListItem;
+Wuse 'My::Project';
+Wuse 'project::TraceFS::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::badblock_guess::ListItem;
+Wuse 'My::Project';
+Wuse 'project::badblock_guess::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::captive::ListItem;
+Wuse 'My::Project';
+Wuse 'project::captive::ListItem';
my $W=My::Project->init_project(
my %item;
for my $dir (keys(%dirs)) {
- require "$dir/ListItem.pm";
+ Wrequire "$dir/ListItem.pm";
my $item=eval('\%My::Project::'.$dir.'::ListItem');
do { warn "Broken $dir/List.pm"; next; } if !defined %$item;
$item{$dir}=$item;
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::checkstatic::ListItem;
+Wuse 'My::Project';
+Wuse 'project::checkstatic::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::cvsbranchdiff::ListItem;
+Wuse 'My::Project';
+Wuse 'project::cvsbranchdiff::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::cvsutil::ListItem;
+Wuse 'My::Project';
+Wuse 'project::cvsutil::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::d1xnet::ListItem;
+Wuse 'My::Project';
+Wuse 'project::d1xnet::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::doswatch::ListItem;
+Wuse 'My::Project';
+Wuse 'project::doswatch::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::fixhtml::ListItem;
+Wuse 'My::Project';
+Wuse 'project::fixhtml::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::ircon::ListItem;
+Wuse 'My::Project';
+Wuse 'project::ircon::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::kix::ListItem;
+Wuse 'My::Project';
+Wuse 'project::kix::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::kware::ListItem;
+Wuse 'My::Project';
+Wuse 'project::kware::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::line9k::ListItem;
+Wuse 'My::Project';
+Wuse 'project::line9k::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::mdsms::ListItem;
+Wuse 'My::Project';
+Wuse 'project::mdsms::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::mod_auth_tacacs::ListItem;
+Wuse 'My::Project';
+Wuse 'project::mod_auth_tacacs::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::mot2as::ListItem;
+Wuse 'My::Project';
+Wuse 'project::mot2as::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::netstat::ListItem;
+Wuse 'My::Project';
+Wuse 'project::netstat::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::oslik::ListItem;
+Wuse 'My::Project';
+Wuse 'project::oslik::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::patchd2::ListItem;
+Wuse 'My::Project';
+Wuse 'project::patchd2::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::pipebuf::ListItem;
+Wuse 'My::Project';
+Wuse 'project::pipebuf::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::ppp9k::ListItem;
+Wuse 'My::Project';
+Wuse 'project::ppp9k::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::redirector_ad::ListItem;
+Wuse 'My::Project';
+Wuse 'project::redirector_ad::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::smbfs::ListItem;
+Wuse 'My::Project';
+Wuse 'project::smbfs::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::sshpatch::ListItem;
+Wuse 'My::Project';
+Wuse 'project::sshpatch::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::step::ListItem;
+Wuse 'My::Project';
+Wuse 'project::step::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::surprise::ListItem;
+Wuse 'My::Project';
+Wuse 'project::surprise::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::tac_plus::ListItem;
+Wuse 'My::Project';
+Wuse 'project::tac_plus::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::tcp_rto::ListItem;
+Wuse 'My::Project';
+Wuse 'project::tcp_rto::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::tcpdump::ListItem;
+Wuse 'My::Project';
+Wuse 'project::tcpdump::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::timeplan::ListItem;
+Wuse 'My::Project';
+Wuse 'project::timeplan::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::vblib::ListItem;
+Wuse 'My::Project';
+Wuse 'project::vblib::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::winvnc::ListItem;
+Wuse 'My::Project';
+Wuse 'project::winvnc::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::wllib::ListItem;
+Wuse 'My::Project';
+Wuse 'project::wllib::ListItem';
My::Project->init_project(
BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::xbill::ListItem;
+Wuse 'My::Project';
+Wuse 'project::xbill::ListItem';
My::Project->init_project(