Sure, if you think it will help:

c:\test>type test.c

int __declspec( dllexport ) test( int x ) {
    x *= 2;
    return x;
}

c:\test>cl /LD /MT test.c
Microsoft (R) 32-bit C/C++ Standard Compiler Version 13.00.9466 for 80
+x86
Copyright (C) Microsoft Corporation 1984-2001. All rights reserved.

test.c
Microsoft (R) Incremental Linker Version 7.00.9466
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:test.dll
/dll
/implib:test.lib
test.obj
   Creating library test.lib and object test.exp

c:\test>type dlltest.pl
#! perl -slw
use strict;
use Win32::API;

my $fun = Win32::API->new(
    'test.dll', 'int test( int x )'
) or die $^E;

print $fun->Call( 123 );

c:\test>dllTest
246
[download]