Re: How can I cleanly split a string of text into a two-dimensional array

would something liek this work?

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

open(FILE,"<xpm-pic");
$row=-1;$col=-1;
while (<FILE>) {
  chomp;
  $row++;
  $col=-1;
  foreach $char (split //) {
    $col++;$pix[$row][$col]=$char;
  }
}
print Dumper(\@pix);
[download]

Comment on Re: How can I cleanly split a string of text into a two-dimensional array Download Code