foreach ( @lines )
{
    my @cells = split ;
    push @data, \@cells ;
}