note
thanos1983
<p>Hello [id://1183663|jamroll],</p>
<p>Your description is very open, you are saying that you have all these modules that you are trying to call. Did you implement all these modules yours self? Do you have a main script eg. main.pl that calls the modules in the directory?</p>
<p>For example pseudo code main.pl</p>
<code>
#!usr/bin/perl
use strict;
use warnings;
use pm::security;
print banned(...); # This is how you are calling the method and you are getting the error?
</code>
<p>How you export your methods? Have you read [id://102347|Simple Module Tutorial]</p>
<p>We need to see at least one module and how you have define it, how you are calling it and see why you are not able to access your methods.</p>
<p>Provide us all these data with well formatted output and we will be more that happy to provide assistance.</p>
<p><strong>Update: </strong>Sample of your module to get you started:</p>
<p>Perl module (Security.pm) inside your directory Pm. Path to the module is (local dir of main.pl module Pm/Security.pm)</p>
<code>
package Pm::Security;
use strict;
use warnings;
use Exporter;
use vars qw($VERSION @ISA @EXPORT_OK);
$VERSION = 1.00;
@ISA = qw(Exporter);
@EXPORT_OK = qw(banned);
sub banned { return reverse @_ }
1;
</code>
<p>Main module (main.pl)
<code>
#!usr/bin/perl
use say;
use strict;
use warnings;
use Pm::Security qw( banned );
# use Benchmark qw(:all) ; # WindowsOSn
# use Benchmark::Forking qw( timethese cmpthese );
my @list = qw (First ~ Second);
say banned( @list );
__END__
$ perl main.pl
Second~First
</code>
<p>Hope this helps, BR</p>
<code></code>
<div class="pmsig"><div class="pmsig-1069339">
Seeking for Perl wisdom...on the process of learning...not there...yet!
</div></div>
1193152
1193152