[R-gregmisc-users] SF.net SVN: r-gregmisc:[1387] trunk/gdata/inst/perl/xls2csv.pl

[<wa...@us...>]

Revision: 1387
          http://r-gregmisc.svn.sourceforge.net/r-gregmisc/?rev=1387&view=rev
Author:   warnes
Date:     2010-01-23 07:11:46 +0000 (Sat, 23 Jan 2010)

Log Message:
-----------
Check if parsing the xls file succeeds...  Current code doesn't handle new XML-based format

Modified Paths:
--------------
    trunk/gdata/inst/perl/xls2csv.pl

Modified: trunk/gdata/inst/perl/xls2csv.pl
===================================================================
--- trunk/gdata/inst/perl/xls2csv.pl	2010-01-23 07:09:08 UTC (rev 1386)
+++ trunk/gdata/inst/perl/xls2csv.pl	2010-01-23 07:11:46 UTC (rev 1387)
@@ -117,7 +117,7 @@
 close(FH);
 
 print "Loading '$ARGV[0]'...\n";
-my $oBook = $oExcel->Parse($ARGV[0]);
+my $oBook = $oExcel->Parse($ARGV[0]) or die "Error parsing file '$ARGV[0]'.\n";
 print "Done.\n";
 
 print "\n";


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.