Perl script to convert xlsx to xls file Post: 302903944

Sponsored Content

Top Forums Shell Programming and Scripting Perl script to convert xlsx to xls file Post 302903944 by balajesuri on Saturday 31st of May 2014 02:20:43 AM

05-31-2014

Registered User

Hello kshitij, I didn't read through your entire code. But here's an example.. This is what I do in here.. Read from xlsx file using Spreadsheet::XLSX module and write to xls using Spreadsheet::WriteExcel module.

Code:

#! /usr/bin/perl

use warnings;
use strict;

use Spreadsheet::XLSX;
use Spreadsheet::WriteExcel;

my $excel_xlsx = Spreadsheet::XLSX -> new ('sample.xlsx');
my ($sheet_xlsx, $row, $col, $cell);

my $excel_xls = Spreadsheet::WriteExcel->new('sample.xls');
my $sheet_xls = $excel_xls->add_worksheet();

for $sheet_xlsx ( @{ $excel_xlsx->{Worksheet} } ) {
    for $row ( $sheet_xlsx->{MinRow} .. $sheet_xlsx->{MaxRow} ) {
        for $col ( $sheet_xlsx->{MinCol} .. $sheet_xlsx->{MaxCol} ) {
            my $cell = $sheet_xlsx->{Cells}[$row][$col];
            print "$cell->{Val} ";
            $sheet_xls->write($row, $col, $cell->{Val});
        }
        print "\n";
    }
}

Attached file has a sample.xlsx that will be converted to sample.xls
sample.tar.gz

Code:

[user@host ~]$ ./test.pl
id name
1 tom
2 dick
3 harry
[user@host ~]$ ls -l sample.xls*
-rwxr-xr-x 1 user None 5632 May 31 11:49 sample.xls
-rwxr-xr-x 1 user None 7402 May 31 11:16 sample.xlsx

balajesuri

View Public Profile for balajesuri

Find all posts by balajesuri

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Convert a csv file to an xls format

Hi, I have a file coming in xxx.txt(csv format) i do some work on it and i need to send out as a .xls format. Is there any way there is some code i can use in my script to convert this? I'm struggling on this. Thanks

2. UNIX for Dummies Questions & Answers

Unix script to convert .csv file to.xls format

I have a .csv file in Unix box i need a UNIX script to convert the.csv files to.xls format. Its very urgent please help me.

3. UNIX for Dummies Questions & Answers

converting xls,xlsx files ??

I think I know the answer to this :rolleyes: but thought I'd ask anyway. You never know. Does anyone know of a program or utility that will run on any unix platform and convert Microsoft Excel files to ascii/plain text files that unix can understand ? Thanks in advance. Floyd

4. Shell Programming and Scripting

How to convert a xls file to csv?

Hi, My requirement is to convert the xls to csv file with utf-8 conversion. Is there any way please suggest me. Thanks, Raja

5. Shell Programming and Scripting

Perl script to get info from specific rows & columns (.xls file)

Hi all, I want to read some specific rows & columns in the .xls file with my script to get the data to be manipulated. Now, I can read the .xls file correctly & i can go to the specific sheet that I want but i have a problem to specify the specific rows & columns. I mean, I want to get the info...

6. Shell Programming and Scripting

perl module to convert xlsx format to xls format

Hi Folks, I have written a perl script that reads data from excel sheet(.xls) using Spreadsheet::ParseExcel module. But the problem is this module doesn't work for excel sheets with extension .xlsx. I have gone through Spreadsheet::XLSX module with which we can read from .xlsx file directly....

7. Shell Programming and Scripting

Perl: module to convert xlsx to csv

Is there any perl module to convert .xlsx file(excel sheet 2007) to a csv file.

8. Shell Programming and Scripting

Perl script to Convert XLSX or XLS files to CSV file

Hi All, I've got in a situation where I need to convert .xlsx or .xls formatted files into simple text file or .csv file. I've found many options but doing this using PERL script is the best way I believe.I'm in AIX box. Perl code should have 2 params while running. i.e perl...

9. Shell Programming and Scripting

Merging Multiple XLS into Different tabs in xls/ xlsx

HI, I have multiple files per dept in folder for eg : In a folder File1_Dept100.xls File2_Dept100.xls File3_Dept100.xls File1_Dept200.xls File2_Dept200.xls File3_Dept200.xls Output should be : Dept100.xls which has File1, File2, File3 in different tabs Dept200.xls which has...

10. UNIX for Advanced & Expert Users

Converting xls file to xlsx on UNIX script / command line.

Hi All, Am needing advise on how to convert xls file to xlsx format on Solaris unix command line or scripting. I tried searching online but it looks like I need to either use Perl packages of Excel or Python packages or some other 3rd party tool. Problem is to install any of these will require...

LEARN ABOUT DEBIAN

excel::template::element::cell

Excel::Template::Element::Cell(3pm)			User Contributed Perl Documentation		       Excel::Template::Element::Cell(3pm)

NAME

       Excel::Template::Element::Cell - Excel::Template::Element::Cell

PURPOSE

       To actually write stuff to the worksheet

NODE NAME

       CELL

INHERITANCE

       ELEMENT

ATTRIBUTES

       o   TEXT

	   This is the text to write to the cell. This can either be text or a parameter with a dollar-sign in front of the parameter name.

       o   COL

	   Optionally, you can specify which column you want this cell to be in. It can be either a number (zero-based) or an offset. See
	   Excel::Template for more info on offset-based numbering.

       o   REF

	   Adds the current cell to the a list of cells that can be backreferenced.  This is useful when the current cell needs to be referenced
	   by a formula. See BACKREF and RANGE.

       o   WIDTH

	   Sets the width of the column the cell is in. The last setting for a given column will win out.

       o   TYPE

	   This allows you to specify what write_*() method will be used. The default is to call write() and let Spreadsheet::WriteExcel make the
	   right call. However, you may wish to override it. Excel::Template will not do any form of validation on what you provide. You are
	   assumed to know what you're doing.

	   The legal types (taken from Spreadsheet::WriteExcel) are:

       o   COMMENT

	   Add a comment to the cell

	   o   blank

	   o   formula

	   o   number

	   o   string

	   o   url

	   o   date_time

	   other write_* methods as defined defined Spreadsheet::WriteExcel would be integrated by request

CHILDREN

       FORMULA

EFFECTS

       This will consume one column in the current row.

DEPENDENCIES

       None

USAGE

	 <cell text="Some Text Here"/>
	 <cell>Some other text here</cell>

	 <cell text="$Param2"/>
	 <cell>Some <var name="Param"> text here</cell>

       In the above example, four cells are written out. The first two have text hard-coded. The second two have variables. The third and fourth
       items have another thing that should be noted. If you have text where you want a variable in the middle, you have to use the latter form.
       Variables within parameters are the entire parameter's value.

       Please see Spreadsheet::WriteExcel for what constitutes a legal formula.

AUTHOR

       Rob Kinyon (rob.kinyon@gmail.com)

SEE ALSO

       ROW, VAR, FORMULA

perl v5.14.2							    2012-04-29				       Excel::Template::Element::Cell(3pm)