use Win32::OLE;

my $obj = Win32::OLE->CreateObject('ProgID_of_your_Perl_DLL.app');

$obj->CoolRoutine();