| Subject: | Undefined subroutine |
| Date: | Wed, 11 May 2011 23:38:45 +0400 |
| To: | bug-Module-Refresh [...] rt.cpan.org |
| From: | Dmi Try <dmitry1976 [...] gmail.com> |
Hello
Module doesn't work or I am doing something wrong:
Distribution name and version - Module-Refresh-0.16
Perl version - $ /usr/local/bin/perl5.10.0 -v
This is perl, v5.10.0 built for i86pc-solaris
Operating System vendor and version - SunOS pix 5.10
Generic_137138-09 i86pc i386 i86pc
Details - when I run simple script a.pl
----------------------- a.pl --------------------
#!/usr/local/bin/perl5.10.0 -w
use strict;
use b;
use Module::Refresh;
my $refresher = new Module::Refresh;
while (1) {
$refresher->refresh_module_if_modified('b.pm');
b::ff();
sleep 1;
}
-------------------------------------------------
where b.pm is
----------------------b.pm---------------------
package b;
sub ff {
print "AA\n";
}
1;
-------------------------------------------------
I run a.pl and after few seconds change print "AA\n"; in b.pm to
print "AAAA\n"; it complain about redefined subrotine, when I try to
change b.pm once more - it exit with "Undefined subroutine &b::ff"
error.
$ ./a.pl
AA
AA
AA
Subroutine ff redefined at b.pm line 3.
AAAA
AAAA
AAAA
AAAA
Undefined subroutine &b::ff called at ./a.pl line 8.
--
--
Dmitry