Help for this page

Select Code to Download


  1. or download this
    print "Letters are >>@letters<<\n";
    
  2. or download this
    foreach my $letter (@letters) {
        print "Got letter '$letter'\n";
    };
    
  3. or download this
    for my $i (0..$#letters) {
        print "Flag $i is $letters[$i]\n";
    };