#  Output.
perl x.pl -BUG_MODE=0 ;  perl x.pl -BUG_MODE=1 ;
** Running in bug mode: NO **

Highest number: 2
Filtered output ...
    2       INT_NET       Net   : c_c
    2       INT_NET       Net   : b_c
    2       INT_NET       Net   : a_c

** Running in bug mode: YES **

Highest number: 2
Filtered output ...
    2       INT_NET       Net   : c_c
    2       INT_NET       Net   : c_c
    2       INT_NET       Net   : b_c
    2       INT_NET       Net   : c_c
    2       INT_NET       Net   : b_c
    2       INT_NET       Net   : a_c