Select Code to Download

sub isogram {
#234567890#234567890#234567890#234567890#234567890
...

print "$_ is ", (isogram($_) ? '' : 'not '), "an isogram\n" for @ARGV;

sub isogram {
#23456789
...
}

print "$_ is ", (isogram() ? '' : 'not '), "an isogram\n" for @ARGV;