I'm trying to use the Win32::API module to call a simple test case
DLL
(call it "Test.dll").
Test.cpp file
extern "C" __declspec(dllexport) int test(int x)
{
x *= 2;
return x;
}
Test.h file
extern "C" __declspec(dllexport) int test(int);
#note compling the above Cpp code using VC++ complier(Visual studio
2005)
Perl File
Test.pl
#!/usr/bin/perl
use strict;
use warnings;
use Win32::API;
use Win32::API::Callback;
use Win32::API::Test;
my $fun = Win32::API->new('Test.dll', 'int test(int a)') or die $^E;
my $Result = $fun->call($num1);
print "$Result\n";
while executing the above perl file Test.pl throws error out saying
"The specified procedure could not be found at Test.pl line 17."
please comment on the above error n let me know wat the problem is....
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
