Just for kicks:

#!/usr/local/bin/perl
use Data::Dumper;
map{(/\n/)?$i=0*$j++:$r[$i++][$j]=$_;}split // while(<DATA>);

print Dumper(\@r);


__DATA__
ABC
DBC
ECC
[download]

Update:
I know map in void context, hard to read, ugly, not strict, bad. I just felt like golfing it.

Update 2:
map{(/\n/)?$i=0*$j++:$r[$i++][$j]=$_;}split//for<DATA>;