#!/usr/bin/perl

  use strict;

  my ($a, $b, $d, $e) = (1, 1, 1, 7);

if(($a == 1 && $b < 2) && ($d < 4 && $e >= 6)) { 
  print "Trying is fun!\n" 
};
[download]