#!/usr/bin/perl -w
if (1 == 1)
{
  print "triue\n";
}
 if(1 == 2)
{
  print"false\n";
}
if ('a' eq 'b')
{
  print "trie\n";
}
 if('1'eq '1foo')
{
  print "true\n";
}
if('1' eq 'foo1')
{
  print "false\n";
}