Help for this page

Select Code to Download


  1. or download this
    my $x = 1.1 - 1.0; 
    print(qq[$x <= 0.1 ? ] . ($x <= 0.1 ? q[yes] : q[no] ));
    
  2. or download this
    my $x = 1.0 - 0.9; 
    print(qq[$x <= 0.1 ? ] . ($x <= 0.1 ? q[yes] : q[no] ));
    
  3. or download this
    ~$: perl -v
    This is perl, v5.10.1 (*) built for x86_64-linux-gnu-thread-multi