High fanout nets in the post compile netlist:
    Fanout  Type          Name
    --------------------------
    2       INT_NET       Net   : c_c
                          Driver: c_pad
    2       INT_NET       Net   : b_c
                          Driver: b_pad
    2       INT_NET       Net   : a_c
                          Driver: a_pad
    1       INT_NET       Net   : sum_c
                          Driver: sum_1_SUM0_0
    1       INT_NET       Net   : N_5
                          Driver: sum_1_CO0_i

##</code><code>##

    2       INT_NET       Net   : c_c
    2       INT_NET       Net   : b_c
    2       INT_NET       Net   : a_c

##</code><code>##

my $high_number = 0;
open (F1, "<new.txt") or die "cant open it$!";
while (<F1>) {
my ($number) = m/:(\d+):/;
$high_number = $number if $number > $high_number;
 }
print "Highest number found = $high_number\n";
close (F1);