Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: required files

by GrandFather (Saint)
on Apr 18, 2006 at 21:33 UTC ( [id://544206]=note: print w/replies, xml ) Need Help??


in reply to required files

Sometimes 10 lines of code is worth a few hundred words of description. This is one of those times - show us some code. Remember to check that you get no errors or warnings when you include use strict; use warnings in your code.


DWIM is Perl's answer to Gödel

Replies are listed 'Best First'.
Re^2: required files
by Anonymous Monk on Apr 18, 2006 at 21:45 UTC
    Well, to get the gest of I I'll post the entire yabb.pl file. You can see my small require "test.pl" in there.
    test.pl ----------------------------- sub thisisatest { print "username is $username"; } 1;
    main script (look for ################### for my code) ---------------------------- #!/usr/bin/perl -- if ($action eq 'detailedversion') { return 1; } # Make sure the module path is present # Some servers need all the subdirs in @INC too. push(@INC, "./Modules"); push(@INC, "./Modules/Upload"); push(@INC, "./Modules/Digest"); if ($ENV{'SERVER_SOFTWARE'} =~ /IIS/) { $yyIIS = 1; $0 =~ m~(.*)(\\|/)~; $yypath = $1; $yypath =~ s~\\~/~g; chdir($yypath); push(@INC, $yypath); } # Check for Time::HiRes #eval { require Time::HiRes; import Time::HiRes qw(time); }; #if ($@) { $START_TIME = 0; } #else { $START_TIME = time; } ### Requirements and Errors ### $script_root = $ENV{'SCRIPT_FILENAME'}; $script_root =~ s/\/YaBB\.(pl|cgi)//ig; if (-e "Paths.pl") { require "Paths.pl"; } elsif (-e "$script_root/Paths.pl") { require "$script_root/Paths.pl"; +} require "$vardir/Settings.pl"; require "$vardir/advsettings.txt"; require "$vardir/secsettings.txt"; require "$vardir/membergroups.txt"; require "$sourcedir/Subs.pl"; require "$sourcedir/DateTime.pl"; require "$sourcedir/Load.pl"; #require "test.pl"; # Those who write software only for pay should go hurt some other fiel +d. # - Erik Naggum &LoadCookie; # Load the user's cookie (or set to guest) &LoadUserSettings; # Load user settings &WhatTemplate; # Figure out which template to be using. &WhatLanguage; # Figure out which language file we should be us +ing! :D ################################################# #below ################################################# require "test.pl"; &thisisatest; ################################################# # end #################################################

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://544206]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others about the Monastery: (3)
As of 2024-03-28 15:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found