#! /usr/bin/perl
use strict;
use warnings;

use 5.010;

my $zeit1 = '05:14';
my $zeit2 = '09:14';
my $zeit3 = '21:14';

if ( $zeit1 ge $zeit3 || $zeit2 le $zeit3 ) {
	say "abc";
}