Splitting arrays in Perl - arrays

Question

I am new to Perl
I have below data into arrays, each product is a value of this array,
print #array
Product A
Date=2.3.13
Value=100
Time=2.12
Product B
Date=4.5.12
value=20
Description=Goods
Product C
...
...
These products can change from A to Z, and their attributes can change as well, can some one help me getting data in below format
Product Date Value Descrip Time
A 2.3.13 100 -Nil- -Nil-
B 4.5.12 20 Goods

Answer 1

Based on additional input from the author and the comments, here's an updated answer.
Prepare a data structure (hash) to store data for one product.
Read in the file product-by-product, by parsing consequtive lines. Store the data for one product in memory.
Print the data as soon as you are finished with one product (an empty line seems to be a separator). Clear the data. Repeat.
In total, this would look like this:
my $empty = {
name => "",
date => "",
value => ""
# etc
};
my $product = $empty;
while (my $line = <$file>) {
if ($line =~ m/^Product\s+(.*)$) {
$product->{name} = $1;
} elsif ($line =~ m/^\s+Date=(\d+\.\d+\.\d+)$/) {
$product->{date} = $1;
} elsif () {
# etc.
} elsif ($line eq "") {
# Empty line
print $product->{name} . "\t" . $product->{date} . "\n"; #etc
# Clear the product data
$product = $empty;
}
}