my $ifCondition = sub {
    $_[0] eq 'XB'
};

print $ifCondition->($TestVar1);
if ($ifCondition->($TestVar1)) {
    print "TestVar1 (value '$TestVar1') matches the condition.";
};