$send_flag = $bbstatus ne $last_bbstatus ? 1 : ($now - $last_send_time) > $min_frequency ? 1 : defined($OPTS::opts{f}) ? 1 : 0; #### $send_flag = $bbstatus ne $last_bbstatus ? 1 : ($now - $last_send_time) > $min_frequency ? 2 : defined($OPTS::opts{f}) ? 3 : 10; #### my %send_messages = ( 1 => "Status has changed", 2 => "Last send too old", 3 => "Forced send requested", 10 => "No changes" );