my $a = 'one';
my $result = $a ne 'five'
