Re^2: Extract column of excel

[MynameisAchint]

#!/bin/perl -w
use strict;

#variables you can change to suit your needs
my $column_separator = ",";
my $column_number = "8";
$column_number--;
my $file="Working_On.csv";
open(FILE,"<","$file");
my @lines=<FILE>;
close FILE;

foreach my $line (@lines){
 my @columns = split(/$column_separator/,"$line");
 print $columns[$column_number],"\n";
}

This code is working but the problem is that it does not take the entire column it truncates the column , if anyone can look why the code does not take the entire column . thanks

[hdb]

While barely readable your code suggests that you are processing a CSV file, not an Excel file. This is quite a different question.

Can you please specify in which way the column is truncated? Are you not getting all rows or are entries somehow garbled? Again, quite different approaches would be required.

[MynameisAchint]

Yes I am working on csv file , the truncation is such that the entries are taken in the correct sequence but they are taken from somewhere in between not from the starting

[hdb]

How about an example?