foreach my $records (@merged_array) {
    my @elements = split /,/, $records;

    	print $elements[0];