Help for this page
my $ifCondition = sub { $_[0] eq 'XB' ... if ($ifCondition->($TestVar1)) { print "TestVar1 (value '$TestVar1') matches the condition."; };