#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

my @data = (0,1,2,3 );
print "BEFORE: ",join(',',@data),"\n";
my $saved_data = Dumper(\@data);
# ...here you would write saved data to textfile
my $VAR1; eval $saved_data;
my @data2 = @{$VAR1};
print "AFTER: ",join(',',@data2),"\n";
[download]

BEFORE: 0,1,2,3
AFTER: 0,1,2,3
[download]

Not sure if these are what you're looking for, but a few of the Bio:: namespace modules looked good. Link: Matrix.

If your specific mention of a text file was arbitrary, you might consider Storable, which easily and efficiently stores a data structure for reuse at a later time. The downside is that the file isn't human readable.

perl -e 'split//,q{john hurl, pest caretaker}and(map{print @_[$_]}(joi
+n(q{},map{sprintf(qq{%010u},$_)}(2**2*307*4993,5*101*641*5261,7*59*79
+*36997,13*17*71*45131,3**2*67*89*167*181))=~/\d{2}/g));'
[download]

Hi,

Hi, you can do that with any serialization module. For example you can use YAML::Syck.

BTW there's also PDL

Regards,

If using PDL then PDL::IO::Fastraw::maptextfraw could be useful for this - it reads a text file of numbers directly into a matrix.

HTH, andye

# matrix of random numbers
my @matrix;
for my $y ( 0..9 ) {
    my @row = ();
    for my $x ( 0..9 ) {
        push @row, 100*rand();
    }
    push @matrix, \@row;
}
[download]