Hello ther inmates can you point a very confused monk in the right direction please?! I've written a new Perl script that loads 2 of my own in-house written modules -

###############################################################

use lib '/home/interface/scripts/Perl_Modules' ;     # Where the in-ho
+use modules live

#
# In-House written modules
#--------------------------#

use ACC_Heather ;
use ACC_Various qw(end_it mail mail_log update_report date_validation)
+ ;
[download]

The problem is that the ACC_Heather module uses some of the subroutines contained within ACC_Various. I thought that this would be simple enough - it may well be but I'm probably a lot simpler!! I put a use ACC_Various inside the ACC_Heather module :-

package ACC_Heather ;
#
our @EXPORT = qw(ACC_IHS_PROFILE run_SQLPLUS ACC_PUT_STEP ACC_GET_STEP
+ ACC_BOX Update_Job_Status_Log ) ;
#our @EXPORT_OK = qw() ;
use Exporter ;
our @ISA = qw(Exporter) ;
#
use ACC_Various qw(end_it mail mail_log update_report date_validation)
+ ;
[download]

thinking that if I prefixed every call of an ACC_Various subroutine within ACC_Heather with ACC_Various:: everything would be fine.

   if (! -e $SQL_script) {
    $msg = "SQL script $SQL_script does not exist" ;
    if (! ACC_Various::&update_report("$logfile","$msg",1,1,0)) {
       print "\n\tUnable to run Sub update_report :: $!\n" ;
    }
    print "\n\t$msg\n" ;
    print "\t*****************************************\n" ;
    print "\t* Contact Analyst in Team 1 - Urgently! *\n" ;
    print "\t*****************************************\n" ;
    return 0 ;
   }
[download]

Nope!! I got that wrong! The very first call to update report results in the following error :-

Undefined subroutine &ACC_Heather::update_report called at /home/inter
+face/scrip
ts/Perl_Modules/ACC_Heather.pm line 737.
[download]

Am I missing something very obvious or can/should this not be done? See what I mean about confusion! (Okay I admit it I made a typo in a reply!) I've tried all of the following :-

&ACC_Heather::update_report(....)
ACC_Heather::&update_report(....)
&ACC_Various::update_report(....)
ACC_Various::update_report(....)

All resulting in the same error. I use ACC_Various in lots of other scripts but this is the first time I've tried using it within another module. The EXPORT etc of ACC_Various is :-

package ACC_Various ;
#
our @EXPORT = qw(end_it mail mail_log date_validation ACC_BOX) ;
our @EXPORT_OK = qw(run_SQLPLUS update_report error_report) ;
use Exporter ;
our @ISA = qw(Exporter) ;
#
[download]

Any other suggestions? I could be really boring and copy all of the subroutines from ACC_Various into ACC_Heather but .... I'd learn nothing. Thanks in advance.

************************************************************ Sorry guys you're dealing with an idiot!!!! Officially! * * When I made the changes to my code I wasn't in the * * directory I thought I was and as a result I was using * * the original failing code all the time!!! * * * * I'd shoot myself but I'd probably MISS!!!!! * ***********************************************************

---

---

• 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.