Select Code to Download

my $string = "1:00";
if ( do { no warnings qw( numeric ); int( $string ) } > 3 ) {
...
} else {
   say "< 4";
}

my $string = "1:00";
if ( do { no warnings qw( numeric ); $string >= 4 } ) {
...
} else {
   say "< 4";
}