Help for this page

Select Code to Download


  1. or download this
    foreach my $x ( grep defined, @foo ) {
    $x = rand;
]
  2. or download this
    foreach my $x ( map "x$_", @foo ) {
    $x = rand;
}