Hello Monks! I have a file and i want to store it in a 2d array and extract the information while separating it by semicolon. So the file contains three proteins, with their protein names stored in the column ProteinName. It also includes three of their molecular functions, stored in the columns MF1, MF2 and MF3. The data is tab separated in the file. The content from the file should be read into to the program and stored in a 2D array. From this 2D array, I want to print out the concatenated string of each protein and its molecular functions separated with a semicolon. Here is the file

ProteinName    MF1    MF2    MF3
GH1    Growth factor activity    Growth hormone receptor binding    Ho
+rmone activity
POMC    G protein-coupled receptor binding    Hormone activity    Sign
+aling receptor binding
THRAP3    ATP binding Source    Nuclear receptor transcription coactiv
+ator activity    Phosphoprotein binding
[download]

I want the output like this

 GH1; Growth factor activity; Growth hormone receptor binding; Hormone
+ activity
POMC; G protein-coupled receptor binding; Hormone activity; Signaling 
+receptor binding
THRAP3; ATP binding Source; Nuclear receptor transcription coactivator
+ activity; Phosphoprotein binding
[download]

Here is my code for this approach

#!/usr/bin/perl -w

use strict;


    open(FH, "/Users/Desktop/Gene.txt") or die; 

my @content = (<FH>); 

close(FH);

my @myArray;


for my $row (@content) {

    my @columns = split ' ', $row;

    push @myArray, \@columns;
}

my $title_row = shift @myArray;

for my $row (@myArray) {
    my $sum = 0;

    for my $col (1 .. $#$row) { 

        $sum += $row->[$col];
    }
    print "$row->[0] is $sum\n";
}
[download]

But it gives me this error

Argument "Growth" isn't numeric in addition (+) at task3.pl line 31.
Argument "factor" isn't numeric in addition (+) at task3.pl line 31.
Argument "activity" isn't numeric in addition (+) at task3.pl line 31.
Argument "Growth" isn't numeric in addition (+) at task3.pl line 31.
[download]

Please help me in this context

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.