00001 use Win32::OLE; 00002 my $packageManager = Win32::OLE->new('MiKTeX.PackageManager') 00003 or die "MiKTeX is not properly installed.\n"; 00004 $installer = $packageManager->CreateInstaller(); 00005 $installer->Add ("$ARGV[0]", 1); 00006 $installer->InstallRemove;