This queue is for tickets about the Spreadsheet-ParseExcel CPAN distribution.
Maintainer(s)' notes
If you are reporting a bug in Spreadsheet::ParseExcel here are some pointers
1) State the issues as clearly and as concisely as possible. A simple program or Excel test file (see below) will often explain the issue better than a lot of text.
2) Provide information on your system, version of perl and module versions. The following program will generate everything that is required. Put this information in your bug report.
#!/usr/bin/perl -w
print "\n Perl version : $]";
print "\n OS name : $^O";
print "\n Module versions: (not all are required)\n";
my @modules = qw(
Spreadsheet::ParseExcel
Scalar::Util
Unicode::Map
Spreadsheet::WriteExcel
Parse::RecDescent
File::Temp
OLE::Storage_Lite
IO::Stringy
);
for my $module (@modules) {
my $version;
eval "require $module";
if (not $@) {
$version = $module->VERSION;
$version = '(unknown)' if not defined $version;
}
else {
$version = '(not installed)';
}
printf "%21s%-24s\t%s\n", "", $module, $version;
}
__END__
3) Upgrade to the latest version of Spreadsheet::ParseExcel (or at least test on a system with an upgraded version). The issue you are reporting may already have been fixed.
4) Create a small example program that demonstrates your problem. The program should be as small as possible. A few lines of codes are worth tens of lines of text when trying to describe a bug.
5) Supply an Excel file that demonstrates the problem. This is very important. If the file is big, or contains confidential information, try to reduce it down to the smallest Excel file that represents the issue. If you don't wish to post a file here then send it to me directly: jmcnamara@cpan.org
6) Say if the test file was created by Excel, OpenOffice, Gnumeric or something else. Say which version of that application you used.
7) If you are submitting a patch you should check with the maintainer whether the issue has already been patched or if a fix is in the works. Patches should be accompanied by test cases.
Asking a question
If you would like to ask a more general question there is the Spreadsheet::ParseExcel Google Group.
Owner: |
Nobody in particular
|
Requestors: |
adam [...] jamradar.com
|
Cc: |
|
AdminCc: |
|
|
Severity: |
Normal |
Broken in: |
0.2603 |
Fixed in: |
(no value)
|
|
Fri Sep 23 02:57:26 2005
Guest - Ticket created
Distribution: Spreadsheet-ParseExcel-0.2603
Perl Version: 5.8.6
OS: Linux 2.6.12-1.1390_FC4 #1 Tue Jul 5 19:58:55 EDT 2005 i686 i686 i386 GNU/Linux
I can't seem to parse the test.xls file attached.
Here are the errors:
[root@localhost reports]# ./test.pl
=========================================
Use of uninitialized value in print at ./test.pl line 11.
FILE :
Use of uninitialized value in print at ./test.pl line 12.
COUNT :
Use of uninitialized value in print at ./test.pl line 13.
AUTHOR:
Here is my code:
#!/usr/bin/perl -w
use strict;
use Spreadsheet::ParseExcel;
my $oExcel = new Spreadsheet::ParseExcel;
my $oBook = $oExcel->Parse('test.xls');
my($iR, $iC, $oWkS, $oWkC);
print "=========================================\n";
print "FILE :", $oBook->{File} , "\n";
print "COUNT :", $oBook->{SheetCount} , "\n";
print "AUTHOR:", $oBook->{Author} , "\n";
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);
}
}
}
ALARMPOLARITYKEYID
0020-1-1-0
1020-1-1-1
10020-1-1-10
11020-1-1-11
12020-1-1-12
13020-1-1-13
14020-1-1-14
15020-1-1-15
16020-1-1-16
17020-1-1-17
2020-1-1-2
3020-1-1-3
4020-1-1-4
5020-1-1-5
6020-1-1-6
7020-1-1-7
8020-1-1-8
9020-1-1-9
0120-3-1-0
1120-3-1-1
10120-3-1-10
11120-3-1-11
12120-3-1-12
13120-3-1-13
14120-3-1-14
15120-3-1-15
16120-3-1-16
17020-3-1-17
2120-3-1-2
3120-3-1-3
4120-3-1-4
5120-3-1-5
6120-3-1-6
7120-3-1-7
8120-3-1-8
9120-3-1-9
Mon Sep 11 08:08:42 2006
SZABGAB [...] cpan.org - Correspondence added
On Fri Sep 23 02:57:26 2005, guest wrote:
Show quoted text> Distribution: Spreadsheet-ParseExcel-0.2603
> Perl Version: 5.8.6
> OS: Linux 2.6.12-1.1390_FC4 #1 Tue Jul 5 19:58:55 EDT 2005 i686 i686
> i386 GNU/Linux
>
> I can't seem to parse the test.xls file attached.
>
> Here are the errors:
>
> [root@localhost reports]# ./test.pl
> =========================================
> Use of uninitialized value in print at ./test.pl line 11.
> FILE :
> Use of uninitialized value in print at ./test.pl line 12.
> COUNT :
> Use of uninitialized value in print at ./test.pl line 13.
> AUTHOR:
>
>
> Here is my code:
>
> #!/usr/bin/perl -w
>
> use strict;
> use Spreadsheet::ParseExcel;
>
> my $oExcel = new Spreadsheet::ParseExcel;
> my $oBook = $oExcel->Parse('test.xls');
>
> my($iR, $iC, $oWkS, $oWkC);
> print "=========================================\n";
> print "FILE :", $oBook->{File} , "\n";
> print "COUNT :", $oBook->{SheetCount} , "\n";
> print "AUTHOR:", $oBook->{Author} , "\n";
> 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);
> }
> }
> }
Hi,
I have just started to work on this module.
The attached test.xls file came through as an XML file and not as an
Excel file. If you still have it around I'd appreciate if you could send
it to me.
regards
Gabor Szabo <szabgab@gmail.com>
Mon Sep 11 08:08:44 2006
The RT System itself - Status changed from 'new' to 'open'
Thu Jan 08 09:18:07 2009
jmcnamara [...] cpan.org - Correspondence added
The supplied ile isn't an Excel file, it is a Html document.
Therefore it cannot be parsed by Spreadsheet::ParseExcel.
John.
--
Thu Jan 08 09:18:08 2009
jmcnamara [...] cpan.org - Status changed from 'open' to 'resolved'