comment on

thank you, sir. again, a good read. can't say i fully understood all of that, but i get the gist. See, i have much programming experience - coding in so many languages, including c/c++. I liked OO and inheritance and the "Is A" and "Has A" relationships. when i began coding my new site, i had not known perl could do OO...as I code the site, i learned so much and realize i should have gone OO with this...but, i'm several modules in (11 modules), and I have so many scripts that use the modules (some 32 scripts). like the song i'm hearing says right now - "it's too late". lol - i can't change it. so i'm stuck with the procedural method for now.

the next question on my mind....i'll use code to describe the question, cuz it gets my point across far easier than trying to use words to describe the question

package Blah::Blah::BlackSheep;

use strict;
use warnings;
# etc, etc...etc...

my $loggedin = cookie_get("loggedin"); # does exactly what you think i
+t does...
my $page = get_param(get_constant($db, "QUERY_PAGE")); # the page the 
+user wants to visit
# cookie_get, get_param, get_constant are all subs I created to ease m
+y coding a little, despite it being a tad...convoluted.  it works.  t
+hat's what matters

if (not allowed($page, $loggedin)) {
  print cookie_set("error", "Access Denied!");
  print "location: /\n\n";
  exit 1;
}

sub something {
  return "blah";
}

sub something2 {
  return "bleet";
}

# etc, etc, etc...

1;
[download]

is this "good practice" - i mean the bit before the first sub?

why do i ask? I don't want to have to code the above into EVERY script i write....that's prone to errors, and can be a real B when a change is needed....

if this isn't good practice, how can i accomplish this task? I know PERL allows the above code - compiles without complaint, and it does work....just wanted to know if this is the right way to go about it...?

In reply to Re^6: Perl Modules -- abstraction and interfaces: exporter and @ISA by jamroll
in thread Perl Modules by jamroll

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


more useful options
	PerlMonks