I am new to perl. I have to convert the format of data as follows: Existing data format: (Please note that actual data contains more number of rows and colmns.. and not pre-defined)

-----------------------
1 2 3
a b c
x y z
-----------------------
[download]

The data format I need is:

-----------------------
1 a x
2 b y
3 c z
-----------------------
[download]

I am going to use the new formatted data for an input to create graphs. I have all the necessary modules installed but this logic (I know it is not very complicated, but I am not getting it). Please advice how to take it forward. My final objective is to get the data in variable in somthing similar to following:

my @data = (['1','a','x' ],  ['2','b','y'  ],  ['3','c','z' ]);
[download]

Please help.

=============================
[download]

Folks, The fact is that I am totally lost now :-) My objective was/is: To read a flat file which has SAR (system activity reporter) data and then to generate the graph using that data. I have module for graph but the problem here is the data needs to be transversed (row-> columns). My data looks like:

17:12:41       0       0       0     100
17:12:42       0       1       0      99
17:12:43       0       0       0     100
:
:
[download]

And for the graph creation, I need this data in following format:

17:12:41    17:12:42    17:12:43  :     :    ...  ...  ...
0           0           0         :     :    ...  ...  ...
0           1           0         :     :    ...  ...  ...
0           0           0         :     :    ...  ...  ...
100         99          100       :     :    ...  ...  ...
[download]

Finally, to get an array like below:

my @data = (
['17:12:41','17:12:42','17:12:43'.........],
['0','1','0'.........],
['0','0','0'.........],
['100','99','100'.....]);
[download]