Parsing Excel spreadsheet on osx?

[Adam Witney]

Hi,

I am trying to parse an Excel spreadsheet, but a simple script from the pod

use strict;
use Spreadsheet::ParseExcel;

my $oBook = Spreadsheet::ParseExcel::Workbook->Parse('test.xls');

my($iR, $iC, $oWkS, $oWkC);

foreach my $oWkS (@{$oBook->{Worksheet}}) {
  print "--------- SHEET:", $oWkS->{Name}, "\n";
  
  for(my $iR = $oWkS->{MinRow} ;
               defined $oWkS->{MaxRow} && $iR <= $oWkS->{MaxRow} ; $iR++) {
      for(my $iC = $oWkS->{MinCol} ;
               defined $oWkS->{MaxCol} && $iC <= $oWkS->{MaxCol} ; $iC++) {
          $oWkC = $oWkS->{Cells}[$iR][$iC];
          print "( $iR , $iC ) =>", $oWkC->Value, "\n" if($oWkC);
      }
  }
 }

This gives no output at all. Any ideas if this should work on OSX?

Thanks

Adam


-- 
This message has been scanned for viruses and
dangerous content by MailScanner, and is
believed to be clean.