use Win32::OLE;

my $ie = Win32::OLE->new('InternetExplorer.application') or die "oops\n";
$ie->{visible} = 1;
$ie->Navigate("http://www.cpan.org");

my $dos = Win32::OLE->new('Cmd.application') or die "oops\n";
$dos->{visible} = 1;