http://www.perlmonks.org?node_id=1002804


in reply to Reading Excel file in perl

Can you show some code that you tried and tell us what went wrong with it? Have you tried just running the example that's given in the docs using a really simple spreadsheet?

Replies are listed 'Best First'.
Re^2: Reading Excel file in perl
by Pauler (Initiate) on Nov 08, 2012 at 04:54 UTC
    I havent tried nythng manually, i jst went thru the docs. I am confused of how to give the path where my excel file is saved.
[reply]

      Assuming you already know you have perl installed in your system, can run a perl program, and know that the Spreadsheet::ParseExcel module is installed:

      It looks like you can take the code in the "synopsis" and cut and paste it to be your test program. Copy it into a text editor and save it as something like "myexceltest.pl". this is your perl program.

      Then take a simple excel file (maybe 4 cells by 4 cells, and fill them with numbers 1 through 16 in order) and save it into the same directory as your perl program that you just saved. For convenience you can save it as "Book1.xls", which is the name used in the example

      Then you should be able to go to the directory that your program is in and run the program from there. (e.g. assuming you're on a unix system, type perl myexceltest.pl

      If you haven't even gotten as far as running a perl program, tell us about your system and depending on what it is, someone will probably be able to point you to somewhere that will help you sort out how to do that first.

[reply]
[d/l]
        Hey thanks... I tried as per ur suggestion. But i tried 2 prgs, one for write to excel and another for read excel. I have the below code for write to excel: 
        #!/sbcimp/run/pd/csm/32-bit/perl/5.14.2/bin/perl
use lib qw(/sbcimp/run/pd/csm/32-bit/cpan/5.14.2-2012.03/lib);
use strict;
use Spreadsheet::WriteExcel;

# Create a new Excel file
my $FileName = "/home/dujne/ptice/port.xls";
my $workbook = Spreadsheet::WriteExcel->new($FileName);

# Add a worksheet
my $worksheet1 = $workbook->add_worksheet('PERL');

# Define the format and add it to the worksheet
my $format = $workbook->add_format(
center_across => 1,
bold => 1,
size => 10,
border => 4,
color => 'black',
bg_color => 'cyan',
border_color => 'black',
align => 'vcenter',
);

# Change width for only first column
$worksheet1->set_column(0,0,20);

# Write a formatted and unformatted string, row and column
# notation.
$worksheet1->write(0,0, "PERL FLAVOURS", "Modules",$format);
$worksheet1->write(1,0,"Active State PERL");
$worksheet1->write(2,0,"Strawberry PERL");
$worksheet1->write(3,0,"Vennila PERL" );

        [download]
        The above code runs fine. I m trying to update the next column and add the details next to the column. I have the below code, 
        $worksheet1->write(0,1,"Modules", $format);
$worksheet1->write(1,1,"Excel");
$worksheet1->write(2,1, "Dumper");

        [download]
        bt this code adds 3 different columns, i wanted as Column B as Modules, and below this column i need 2 rows as 1)Excel & 2) Dumper Something like below is needed:: 
        MODULES
Excel
Dumper

        [download]
        But with my code i see the below 
        MODULES  Excel  Dumper

        [download]
        Can someone let me know whats wrong in the avove code??? Or how can i add 3 by 3 cells?
[reply]
[d/l]
[select]
          A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom