use Win32::OLE;

$Obj = Win32::OLE->new('MyCom.MyAPI');
$Obj->MsgBox( 'こんにちは !' );

C:\Documents and Settings\lightbox>ppm
PPM - Programmer's Package Manager version 3.1.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a devision of Sophos.

Entering interactive shell. Using Term::ReadLine::Stub as readline library.

Type 'help' to get started.

ppm> query w*
Querying target 1 (ActivePerl 5.8.2.808)
  1. Win32-API              [0.41] Perl Win32 API Import Facility
  2. Win32-AuthenticateUser [0.02] Win32 User authentication for domains
ppm>