in reply to Re^2: Uninitialized warnings trouble
in thread Uninitialized warnings trouble

Or: 

@row = map [ /\d/g ], <$lines>;

[download]

In Section Seekers of Perl Wisdom