Help for this page

Select Code to Download


  1. or download this
    for my $count (0..4) {
        print("$count: ");
    ...
        elsif ($count < 2) { print "Unique\n"; } 
        else               { print "$count\n"; }
    }
    
  2. or download this
    0: None
    1: Unique
    2: 2
    3: 3
    4: 4
    
  3. or download this
    my $substr = 'xxx';
    for my $parent (
    ...
        elsif ($count < 2) { print "Unique\n"; } 
        else               { print "$count\n"; }
    }
    
  4. or download this
    None
    Unique