-----( DATA )------
 $bar is
       3

 $foo is
       0


 -----( CODE )------
 t1.pl:.:1       $foo = 0;
 t1.pl:.:2       $bar = 3;
 t1.pl:.:3
 t1.pl:.:4=>     if($foo == 2 and $bar == 3) {
 t1.pl:.:5          print "im good \n";
 t1.pl:.:6       } else {
 t1.pl:.:7>>        print "im bad \n";
 t1.pl:.:8       }
 t1.pl:.:9