Help for this page

Select Code to Download


  1. or download this
    print "$_ is ", 
            $_ == 0 ? 'zero' 
          : $_ >  0 ? 'pos'
          :           'neg', 
          "\n" for -1..1;
    
  2. or download this
    print "$_ is ", 
            $_ == 0  ? 'zero'
    ...
          : $_ >  0  ? 'pos'
          :            'neg', 
          "\n" for -2..2;