my $data = read_port(); while( 0 == match_data($data) ) { do_if_no_match(); $data = read_port(); } process_match($data); do_if_no_match(); # End. #### my $loop_i = 0; my $max_i = 100; my $data = read_port(); while( $loop_i < $max_i ) { if( match_data($data) ) { do_if_no_match($data); } else { do_if_no_match( $loop_i ); } $data = read_port(); $loop_i ++; } # End.