Question

I am getting:

Can't call method "test" without a package or object reference at 4.pl line 6.

And i don’t know why, any ideas?

Users.pm

package Users; 
sub new{
    print "Created\n"; 
}
sub test{
    print "a";
}
1;

Test.pl

BEGIN {
  push @INC,"/home/baddc0re/Desktop/perl_test/";
}
use Users;
$user = new Users();
$user->test();

Answer 1

I suggest to you use syntax $users = Users->new() instead of new Users. You forgot to bless values inside new method. Please read perlootut under perldoc.

Users.pm

package Users;

sub new {
    my $class = shift;

    my $self = {};
    bless $self, $class;
    return $self;
}

sub test {
    print "a";
}

1;

MAIN

use strict;
use Users;

my $users = Users->new();
print $users->test();