in reply to condensing code
my $test_nums = int((29 + $total_nums)/30); [download]
-- Randal L. Schwartz, Perl hacker Be sure to read my standard disclaimer if this is a reply.