array subscript

sfrisch_at_state.mt.us
Date: 12/31/03 

Date: 30 Dec 2003 16:15:39 -0800

I am createing an array on the fly. I want to print out each element
and its index value to the screen so the user can pick the
number/index I wil then insert the element or value to a file that I
will open.

I am parceing a differant file each time I run the program so the
lenth and the values will be differant each time it is run.

open(FILE, 'number');
while (<FILE>) {
        if (/Version date/){
        @D = $_;
        print @D;
}

}

Subscripting does not seem to be as staight forward as I remeber
THX In advance

out put looks like this.
Version date : 031124205937
   Version date : 031125205927
   Version date : 031126205934
   Version date : 031127205927
   Version date : 031128205934
   Version date : 031129205936
   Version date : 031130205932
   Version date : 031201205932
   Version date : 031202205935
   Version date : 031203205933
   Version date : 031204205931
   Version date : 031205205935
   Version date : 031206205931
   Version date : 031207205935
   Version date : 031208205934
   Version date : 031209205932
   Version date : 031210205932