Help for this page

Select Code to Download

Select or download this
```
s/$Npod/$N$1$n/s for @file;
```

Select or download this

foreach my $line (@file) {
   $line =~ s/$Npod/$N$1$n/s;
}