elsif ($selectioncriterium eq '=='){
    print "$number1 is ", $number1 == $number2 ? '' : 'not ', "equal to $number2\n";
}