use Win32::Test; $Sum = Win32::Test::AddNumbers (500,250); print "Sum is $Sum \n"; #### package Win32::Test; require DynaLoader; @ISA = qw (DynaLoader); bootstrap Win32::Test; 1;