I have a perl cgi file that works fine. However, I
want to move it into a sub directory -- the cgi-bin
directory for Apache HTTPD is just getting too
crowded.

So I created a directory and moved my file. It could
not find my evidence_db.pm file (which defined
variables like $sCssRoot that contain the paths to my
cascading style sheet directory). So I added the
command use "../" and this lib statement solved one
problem.

However, as I mentioned, I also have js (javascript)
and css (cascading style sheet) files that work in the
top level directory but don't work now. Is there a way
I can painless move files around in directories?

Here is my source code:

use CGI qw(:standard);
use lib "../";
use evidence_db;
use strict;
use warnings;
use POSIX qw(strftime);
print $q->header( ),  
  start_html(-title => ($q->param("sTitle")||"Design
And Request Evaluations for True Value Cases"),
             -meta=>{'keywords'=>'Add Keywords here',
                     'copyright'=>'copyright 2003
Convex'},
             -author   => '[EMAIL PROTECTED]',
             -script=>[
                       { -language => "JavaScript1.2",
                         -src      =>
$sJsRoot."toggle_debug.js"
                         }],
             -background =>
$sImageRoot."flogoback.gif",
             -onload     => "BodyLoad();",
             -style      => {"src" =>
$sCssRoot."convex.css"}


__________________________________
Do you Yahoo!?
Yahoo! SiteBuilder - Free web site building tool. Try it!
http://webhosting.yahoo.com/ps/sb/

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to