0

Hi everyone,

I'm trying to:

(1) take an excel spreadsheet with two columns of data
(2) convert to tab-delimited text file
(3) import into perl as a hash

I've managed to import as an array:

open (LIST1, "list1.txt") || die "File not found\n";
while (<LIST1>) {push(@list1array, $_)};
close LIST1;

However, I can't figure out how to either import directly as a hash or convert the array to a hash. If someone could point me in the right direction, I'd be appreciative.

Thanks!

2
Contributors
2
Replies
3
Views
11 Years
Discussion Span
Last Post by Commander Salam
0

Hi everyone,

I'm trying to:

(1) take an excel spreadsheet with two columns of data
(2) convert to tab-delimited text file
(3) import into perl as a hash

I've managed to import as an array:

open (LIST1, "list1.txt") || die "File not found\n";
while (<LIST1>) {push(@list1array, $_)};
close LIST1;

However, I can't figure out how to either import directly as a hash or convert the array to a hash. If someone could point me in the right direction, I'd be appreciative.

Thanks!

I would do it something like this:

open (LIST1, "list1.txt") || die "File not found\n";
     while (<LIST1>) {
          ($tmpvar1, $tmpvar2) = split(/\t/, $_);
          $hashname{$tmpvar1} = $tmpvar2;
     }
close(LIST1);

Which will open the file, read in the data line by line, split the current line by the tab character (so that what is in the first column will be in tmpvar1, and what is in the second column will be in tmpvar2) then assign the hash in a scalar context. I've tested it with a tab delimited text file, and it works fine for me.... let me know how it works for you.

This topic has been dead for over six months. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.