my $conditional_test = sub {
   my $value = shift;
   return $value==10022 || $value==96813 || $value==55401;
};

if( $conditional_test->($redis_handle->get('key')) ) {
   # do something
}