sub verify {

        my $fh = shift;
        my $routes = 375000;
        my $inet0_total = 3436701;
        my $inet0_active =  498151;
        my $inet6_total = 115803;
         my $pass_count = 1;
        our  $count_adj = 0;
        our  $count_bfd = 0;
        our $tc_count = 1;
        ...............
         $tc_count = $tc_count + 1;