- or download this
package test;
...
## You have no module termination value,
1;
- or download this
use threads;
use test;
...
my $thread=threads->create("forthread", ($argument));
$thread->join();
exit(0);
- or download this
## test.pl
use threads;
...
}
1;
- or download this
C:\test>test.pl
1 at Testit.pm line 11.
Attempt to free unreferenced scalar: SV 0x194aa50, Perl interpreter: 0
+x18290c4 during global destruction.
- or download this
use threads;
use Testit;
...
__END__
C:\test>test.pl
1 at Testit.pm line 11.