Help for this page

Select Code to Download

Select or download this

foreach my $line(@all_lines) {
     $line =~ s/-//g
}

Select or download this
```
$line =~ s/^-//g
```