Step one: clean up the mess you've presented to us. See Writeup Formatting Tips, Markup in the Monastery and the instructions around the text-entry box re para and code tags (Hint: reopen your node and scroll down).

Step Two: Read about regular expressions: what you need to do is very nearly as basic as exists and your answer will be found with minimal searching skills, here or in the likes of perldoc perlretut, perldoc perlrequick<c> and <c>perldoc perlre.

Example: if you were trying to find each instance of a time inside Time: 1041; Time 913; ... end, you might want to code the job as something like this:

my $str = "begin here Time: 1041; foo Time: 917; bar Time: fred; Time:
+ 2313; end";

my @arr;

while ( $str =~ /Time: (\d+); /g ) {
    push @arr, $1;
}
[download]

Note that the perldoc references above will explain the code.

Once you have the matches in an array, there are many XLS/Excel modules to move the data to a spreadsheet. You'll find many threads here (Super Search dealing with writing a spreadsheet. Alternately, google site: CPAN.org excel. You'll have to search the module's docs to pick an appropriate one and to learn how to complete your job/homework/whatever.