sub OR {
    @_ > 1 ? shift || OR(@_) : shift;
}

sub AND {
    @_ > 1 ? shift && AND(@_) : shift;
}