Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: Creating 2D array / Matrix

by aitap (Curate)
on Mar 18, 2013 at 19:27 UTC ( #1024134=note: print w/replies, xml ) Need Help??

in reply to Creating 2D array / Matrix

I'm not quite sure what you want to do with the files, but reading the file in a two-dimensional array can be done this way:
use warnings; use strict; open my $filehandle, "<", "filename.bed" or die "open: $!\n"; my @data; while (<$filehandle>) { chomp; # remove the line ending character push @data, [ split /\t/ ]; # split the rest and append it to our dat +a }; print $data[0]->[0]; # access the first element of the array # it's a reference, "->" dereferences it # at last, access the first element of the dereferenced array

Here the [] brackets create an anonymous array reference (not just an array) filled with the return value of split and this reference (which is a scalar value, so it can be stored in the array) is pushed to the array.

You can always use Data::Dumper to print the contents of your data structure. Read perlreftut and perldsc for more information on references and complex data structures.

Edit: forgot to chomp
Sorry if my advice was wrong.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1024134]
[Discipulus]: just in Rome

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (5)
As of 2018-03-22 21:50 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (286 votes). Check out past polls.