Help for this page

Select Code to Download


  1. or download this
    print "$_ is ", (isogram() ? 'not ' : ''), "an isogram\n" for @ARGV;
    
  2. or download this
    sub not_isogram {
        # ...
    }
    print "$_ is ", (not_isogram() ? '': 'not '), "an isogram\n" for @ARGV
    +;