only decode if the minuite is right

1 files changed, 2 insertions, 3 deletions

diff --git a/decode.pl b/decode.pl
index 2f7dc43..4a7ab27 100755
--- a/decode.pl
+++ b/decode.pl
@@ -714,7 +714,6 @@ for ( my $i = 0 ; $i < ( $n - 2 ) ; ++$i ) {
     my ( $data_bits, $key_bits ) =
       extract( $d->[$i], $d->[ $i + 1 ], $d->[ $i + 2 ] );
 
-
     my $min   = le_bcd_to_int( substr( $key_bits, 0,  8 ) );
     my $hour  = le_bcd_to_int( substr( $key_bits, 8,  8 ) );
     my $day   = le_bcd_to_int( substr( $key_bits, 16, 8 ) );
@@ -724,11 +723,11 @@ for ( my $i = 0 ; $i < ( $n - 2 ) ; ++$i ) {
 
     my $mins_since_midnight = $min + ( $hour * 60 );
 
-    next unless ( $mins_since_midnight %3) == 2;
+    next unless ( $mins_since_midnight % 3 ) == 2;
 
     my $plain = decrypt( $data_bits, $key_bits );
 
-    next unless defined $plain ;
+    next unless defined $plain;
 
     my $dt = DateTime->new(
         year  => $year,