(10 before 2) == False or die "Wrong logic";
(10 after 2) == True or die "Wrong logic";

("Perl" before "Ruby") == True or die "Wrong logic";
("Perl" after "Ruby") == False or die "Wrong logic";