Help for this page

Select Code to Download

Select or download this

my @arr = (q{ one }, q{  two   three  });
for (@arr){
  my $trimmed = join q{ }, split;
  printf qq{*%s*\n}, $trimmed;
}

Select or download this
```
*one*
*two three*
```