#!/usr/bin/perl

my @multi_array;

push @multi_array, [split] for <DATA>;