Help for this page

Select Code to Download

Select or download this
```
$TheFile =~ s/^'//mg;
```

Select or download this

while (my $TheLine = <>) {
   $TheLine =~ s/^'//;
   ...
}