#!/Perl/bin/perl

use strict;
use warnings;
use Win32::OLE;
use Win32::OLE::Const;


my $xl = Win32::OLE->new('Excel.Application');
my $xlConst = Win32::OLE::Const->Load('Microsoft Excel 8.0 Object Library');

print $xl->International($$xlConst{'xlUpperCaseColumnLetter'});
print $xl->International($$xlConst{'xlUpperCaseRowLetter'});