Here's a test snippet for doing something like this without
the help of a module :
use strict;
use warnings;
my $file = 'training.txt';
my @matrix;
my @matrix2;
open OUT, ">$file" or die "create $file: $! ($^E)";
for (my $x = 0; $x < 26; ++$x) {
for (my $y = 0; $y < 26; ++$y) {
amit hetawal wrote:
>
> ?
> Hello all,
> I am writing a matrix to a file as :
>
> open(WRITE, ">training.txt");
> for ($x = 1; $x<27; ++$x)
> {
> for($y=1; $y<27;++$y)
> {
> print WRITE "$matrix[$x][$y] ";
> }
> print WRITE "\n";
>
> }
>
> this code is working fine and writing t