Why does Perl complain about simple words in my Win32 :: OLE script?

Question

#___ FIND LAST ROW/COLUMN WITH DATA
my $row = $Sheet1 -> UsedRange -> Find(
     {      What => "*", 
            SearchDirection => xlPrevious,  
            SearchOrder => xlByRows
      })-> {Row};

Mistake:

Bareword "xlByRows" not allowed while "strict subs" in use. 

Answer 1

You must put it use Win32::OLE::Const 'Microsoft Excel';at the top of your program to correctly import constants.

Take a look at this Perl Monks page . It seems to cover the problems that you have.

Answer 2

See CPAN Docs for Win32 :: OLE :: Const

You need:

use Win32::OLE::Const 'Microsoft Excel';

Answer 3

xlByRows , . OLE, Win32:: OLE:: Const .