| Subject: | End-of-line reset to CR? |
| Date: | Tue, 18 Aug 2009 00:06:43 -0700 |
| To: | bug-Spreadsheet-ParseExcel-Simple [...] rt.cpan.org |
| From: | PF <kernel [...] pkts.ca> |
Hi..
I wrote this program
---
#!/usr/bin/perl -w
use strict;
use Spreadsheet::ParseExcel::Simple;
my $xls = Spreadsheet::ParseExcel::Simple->read('Department Contact
List_2009-2010.xls');
open(OUT,">dept.csv") or die("dept.csv");
foreach my $sheet ($xls->sheets) {
while ($sheet->has_data) {
my @data = $sheet->next_row;
print OUT join("\t",@data),"\n";
}
}
close(OUT);
---
And the output has ^M (carriage returns) instead of ^J (newlines) at the
end of each line. I'm using Fedora 11, with
perl-Spreadsheet-ParseExcel-0.3200-5.fc9.i386.rpm and
perl-Spreadsheet-ParseExcel-Simple-1.04-3.fc9.noarch.rpm
from the Fedora rpm repositories.
--
PF <kernel@pkts.ca>