Help for this page

Select Code to Download


  1. or download this
    for (qw(The quick brown fox)) {
       s/o/u/g;
    }
    
  2. or download this
    for (1..5) {
       $_ = ...;
    }
    
  3. or download this
    for (map "$_", qw(The quick brown fox)) {
       s/o/u/g;
    }
    
  4. or download this
    for (qw(The quick brown fox)) {
       my $s = $_;
       $s =~ s/o/u/g;
    }
    
  5. or download this
    for (qw(The quick brown fox)) {
       for (my $s = $_) {
          s/o/u/g;
       }
    }