if (($TotalNets == 50000) ||
 ($TotalNets == 100000) || ($TotalNets == 250000) ||
 ($TotalNets == 500000) || ($TotalNets == 1000000) || 
($TotalNets == 1500000) || ($TotalNets == 2000000) || 
($TotalNets == 3000000)) {



##</code><code>##

do {
    for (0..N) {
        if ( my $line = <FH>) {
            ...
            do stuff here
            ...
        } else {
            last;
        }
    }
print "$Some_Total";
} until (eof );



##</code><code>##

if ($_ =~ /wire capacitance/) {
				if ($_ =~ /^\s+wire capacitance\:\s+\d.*\d\s*$/) {
					($NetCapRaw) = $_ =~ /^\s+wire capacitance\:\s+(\d.*\d)\s*$/;

##</code><code>##

 if (($DriverForwardSlashCount == 0) && ($NetNameForwardSlashCount == 0)) {
						$AddToCustomTable = 1; 

##</code><code>##

$AddToCustomTable = 1 if ($DriverForwardSlashCount | $NetNameForwardSlashCount <= 1 );