use strict;
use warnings;
use Data::Dumper;

my @parsed_table = map { [ split /,/ ] } FilterData( 2, 0 );

print Dumper \@parsed_table;