Re: sorting numbers

[stephen]

A few things to get you going.

First, to pull the 't=' numbers out of the file, you need to use backreferences. That's when you put something in parens in a regular expression, like so:

m/A t=(d*)/;
my $t_val = $1;

If $_ were

hello A t=40a30

then $t_val would be 40.

Next, you need to use sort. sort operates on a list, like so:

my @list = ('my', 'bonnie', 'lies');
foreach my $word (sort @list) {
   print $word, "\n";
}

The result is:

bonnie
lies
my

sort normally sorts alphabetically. To sort numerically, see the perlfunc:sort manual page.

To collect all of these numbers into a list, you'll need push. Now all you need to do is put these pieces together. :)

stephen