Создание объекта класса

Я получаю:

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

И я не знаю почему, есть идеи?

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();