Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Writing xml from excel sheet .xls using perl script
Top Forums Shell Programming and Scripting Writing xml from excel sheet .xls using perl script Post 302935024 by Corona688 on Thursday 12th of February 2015 11:36:00 AM
Old 02-12-2015
Here is a tool I've cobbled together with Spreadsheet::ParseExcel:

Code:
#!/usr/bin/perl

#!/usr/bin/perl -w
# For each tab (worksheet) in a file (workbook),
# spit out columns separated by ",",
# and rows separated by c/r.

use Spreadsheet::ParseExcel;
use strict;

my $filename = shift || "Book1.xls";
my $e = new Spreadsheet::ParseExcel;
my $eBook = $e->Parse($filename);
my $sheets = $eBook->{SheetCount};
my ($eSheet, $sheetName);

foreach my $sheet (0 .. $sheets - 1) {
    $eSheet = $eBook->{Worksheet}[$sheet];
    $sheetName = $eSheet->{Name};

    # Comment out the below line if you don't care about multiple worksheets
    print "#Worksheet $sheet: $sheetName\n";

    next unless (exists ($eSheet->{MaxRow}) and (exists ($eSheet->{MaxCol})));
    foreach my $row ($eSheet->{MinRow} .. $eSheet->{MaxRow}) {
        foreach my $column ($eSheet->{MinCol} .. $eSheet->{MaxCol}) {
            if (defined $eSheet->{Cells}[$row][$column])
            {
                print $eSheet->{Cells}[$row][$column]->Value . "\t";
            } else {
                print "\t";
            }
        }
        print "\n";
    }
}

It outputs tab-separated text to standard output, like:

Code:
# Worksheet 0:  Current members
column1  column2  column3
...
...
# worksheet 1:  worksheet
...
...
...

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Excel sheet modification using perl module

Is there any possibility to move the content from one cell to another cell (Excel sheet) using perl module? (3 Replies)
Discussion started by: kavi.mogu
3 Replies

2. Shell Programming and Scripting

Excel sheet modification using perl module

I need to insert new column to already existing file ..can any one help me..?? (6 Replies)
Discussion started by: kavi.mogu
6 Replies

3. Shell Programming and Scripting

Excel sheet modification using perl module

Hi , Is there any possibility to read excel sheet in column by column order ?...Thanks in advance,........ :confused: (1 Reply)
Discussion started by: kavi.mogu
1 Replies

4. Programming

Excel sheet modification using perl module

Hi , can any one tell me,"How to extract the same format from existing excel file to new excel file " using Spreadsheet::WriteExcel or Spreadsheet::ParseExcel module ??? Example_pgm: Below program is used to read existing excel file..In this program "my $cell = $_;" line is used to... (0 Replies)
Discussion started by: kavi.mogu
0 Replies

5. Shell Programming and Scripting

Perl : not capturing all the data from excel sheet

Hi folks, I am working on assignment that captures all the records(2 columns one column contains names and other contain date of birth) from excel sheet stored in a directory and checks for current date and month. If it matches current date and month then the matched records are printed as... (1 Reply)
Discussion started by: giridhar276
1 Replies

6. Shell Programming and Scripting

Perl : Deleting the records in the excel sheet

I have a excel sheet with contains the records as below.. also uploaded the input excelsheet and the output excel sheet(expected output). 322mpls32.net.xyz.comBW: 44.0 M Hrly Avg (IN /... (1 Reply)
Discussion started by: giridhar276
1 Replies

7. Shell Programming and Scripting

Perl Reading Excel sheet isssue

There is a perl scriptwhich will read Excel sheet and create one file(.v) . Excel sheet::: A B C D 1 cpu_dailog 2 3 4 Perl will create the file(.v) like thsi ::: assert (cpu_dailog_iso ==2) ; assert (cpu_dailog_reset ==3); assert (cpu_dailog_idle... (3 Replies)
Discussion started by: naaj_ila
3 Replies

8. Shell Programming and Scripting

Perl : to get all the hyperlinks from the xlsx sheet(hyperlinks not visible in excel sheet directly)

Hi folks, I have a requirement in perl to print all the hyperlink from the spreadsheet(xlsx). Spreadsheet contains few lines of hyperlink data (pic attached). P.S. Hyperlink is behind the data and not visible in excel sheet directly. Now using perl script I need to copy the hyperlinks in... (3 Replies)
Discussion started by: scriptscript
3 Replies

9. Shell Programming and Scripting

Summing up the data from different excel sheet into one excel sheet

Hi Folks, Can you please advise for any script in unix such that for example , i have 3 different excel sheet at the location /ppt/gfr/exc so the name s of the excel sheet are 1excel.xslx 2excel.xslx 3excel.xslx now in these 3 different excel sheet there is lot of data for example each... (3 Replies)
Discussion started by: punpun66
3 Replies

10. Shell Programming and Scripting

Writing in excel sheet using ksh

Hello, I'm trying to write a script to export a txt file to excel. The text file is a delimited with commas Example: Report Date,12/12/2014 Report By, Person Issue, Job Failed I tried exporting as csv and mailed to my id. But if I open the csv file the data is coming in single... (6 Replies)
Discussion started by: annamalaikasi
6 Replies

LEARN ABOUT DEBIAN

chartex

CHARTEX(1p)						User Contributed Perl Documentation					       CHARTEX(1p)

NAME

       chartex - A utility to extract charts from an Excel file for insertion into a Spreadsheet::WriteExcel file.

DESCRIPTION

       This program is used for extracting one or more charts from an Excel file in binary format. The charts can then be included in a
       "Spreadsheet::WriteExcel" file.

       See the "add_chart_ext()" section of the  Spreadsheet::WriteExcel documentation for more details.

SYNOPSIS

       chartex [--chartname --help --man] file.xls

	   Options:
	       --chartname -c  The root name for the extracted charts,
			       defaults to "chart".

OPTIONS

       --chartname or -c
	   This sets the root name for the extracted charts, defaults to "chart". For example:

	       $ chartex file.xls

	       Extracting "Chart1" to chart01.bin

	       $ chartex -c mychart file.xls

	       Extracting "Chart1" to mychart01.bin

       --help or -h
	   Print a brief help message and exits.

       --man or -m
	   Prints the manual page and exits.

AUTHOR

       John McNamara jmcnamara@cpan.org

VERSION

       Version 0.02.

COPYRIGHT

       X MMV, John McNamara.

       All Rights Reserved. This program is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.

perl v5.10.1							    2009-11-29							       CHARTEX(1p)
All times are GMT -4. The time now is 12:52 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy