($a>50)
($b==20)
($c eq 'cat')

##</code><code>##

use strict;
use warnings;
{
    my $a = 20;
    my $b = 20;
    my $c = 'dog';
    open IN, "<", 'input.txt' or die "can't open file\n";
    while (my $line = <IN>){
        my $statement = $line;
        chomp ($statement);
        print "$statement\n";
        
        ##Confusing
        if ($statement){
            print "true\n";
        }
    }
}