Help for this page
my @multi_arrayA; push @multi_arrayA, [split(' ', $_)] for <dataA>;
my @multi_arrayA; push @multi_arrayA, [split(' ', $_)] for grep /\S/, +<dataA>;