Help for this page

Select Code to Download

Select or download this
```
while ($sth=~/sth(sth)/g)
 {}
```

Select or download this

$mycopyofstring=$sth;
while ($mycopyofstring=~s/sth(sth)//) {
}