#!/usr/bin/perl

use strict;
use warnings;

my $tmp = 2; 
my $var = 3;

#Is $var greater than $tmp?
print $var > $tmp ? "yes" : "no";

print "\n";

exit $var > $tmp ? 1 : 0;