This is not exactly what you asked for, but it would be easy
to place several sequences in the __DATA__ chunk,
one to a line, and since the timethis is in a
while loop, it will iterate over each seqence.
If you wanted to be really anal, you could then pipe the output
to another perl program to parse and do statistics.