html `-- DEMO |-- DEMO_.html |-- top | |-- DV | | |-- DEMO_top__DV_.html | | |-- rev1 | | | `-- DEMO_top_DV_rev1_.html | | `-- rev2 | | `-- DEMO_top_DV_rev2_.html #### html `-- DEMO |-- DEMO_.html |-- top | |-- DV | | |-- DEMO_top__DV_.html | | `-- rev2 | | `-- DEMO_top_DV_rev2_.html #### my $location = $output_dir; open LOGFILE, $location; my $first_line = 1; my $max_id; while () { if (/_(\d)+/) { if ($first_line) { $first_line = 0; $max_id = $1; } else { $max_id = $1 if ($1 > $max_id); } } }