#!/usr/bin/perl -w

use lib '/home/faculty/st10/perllib';
use lib '/home/faculty/st10';

#use MyFirstModule;

use MyFirstModule qw(first_sub second_sub);
#use MyFirstModule qw(first_sub second_sub third_sub);
#use MyFirstModule qw(:STD);

use MyFirst;

# @INC seems to include those directories where
#    Perl commands/goodies might be found
#    (include paths...)

# notice that the lib pragma ('use lib 'directory';')
#    adds (pushes) on the BEGINNING of this array

# show what's in @INC right now:

foreach $val (@INC)
{
    print "$val \n";
}


# can I call first_sub directly?

&first_sub(13);

# can I call second_sub directly? (only if imported explicitly...)
#&MyFirstModule::second_sub;
&second_sub;

# IF not imported --- can still CALL this "longhand" as so:
#MyFirstModule::second_sub;

# can I call third_sub directly? (SHOULDN'T --- haven't exported!)
#&third_sub;
&MyFirstModule::third_sub;

# since not exported, CAN this be called longhand? YES...!
#MyFirstModule::third_sub;

# can I call this?
&first_sub_oops(467);

# end of lect13_try_module1