geoprocessing using Perl in Arc10

markdenil

Our organization has a large number of scripts written in Perl, and in looking into moving to 10 I have found some issues with creating a geoprocessor. It does not help that I am not very familair with Perl.

Specifically, the line:
my $gp = Win32::OLE->new("esriGeoprocessing.GpDispatch.1") || die $!;
returns the error:
Win32::OLE(0.1709) error 0x80040111: "ClassFactory cannot supply requested class" at C:\...\TestPerl.pl line 6

I realize that GpDispatch.1 is rather old fashioned: I have not been using it in my Python scripting for some time. However, I would like to be able to get the existing Perl scripts working so as to avoid rewriting the whole of every existing script.

How does one create a geoprocessor in Arc 10 using Perl?

JasonScheirer

As a followup, this works for me:

package LoadGPDispatch;

use strict;

use Win32;
use Win32::OLE;

my %RegHash;
use Win32::TieRegistry( TiedHash => \%RegHash );
my $installKey = $RegHash{"HKEY_LOCAL_MACHINE\\Software\\ESRI\\Desktop10.0\\CoreRuntime"};
my ( $installDir, $type ) = $installKey->GetValue("InstallDir");

my $DLLName = "$installDir\\bin\\AppInitializerLib.dll";

Win32::LoadLibrary($DLLName) || die $!;
my $dispatch = Win32::OLE->new("esriGeoprocessing.GpDispatch.1") || die $!;

print "Success.\n";