なぜPerlは私のWin32 :: OLEスクリプトのbarewordsについて文句を言うのですか？

Question

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

エラー：

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

Answer 1

xlByRowsあなたが引用符でそれを置く必要があり、一定ではありません。 OLEオブジェクトによってエクスポートされる定数でない限り、Win32 :: OLE :: Constなどを使用して名前空間にインポートする必要があります。

Answer 2

定数を正しくインポートするには、プログラムの先頭にuse Win32::OLE::Const 'Microsoft Excel';を置く必要があります。

このPerl Monks pageをご覧ください。それはあなたが持っている問題をカバーするようです。

Answer 3

あなたがする必要があるCPAN docs for Win32::OLE::Const

を参照してください：

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