Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
substr $str2r, -$+[1], length ($str2r), '' if $match;

print "$str1r\n$str2r\n";

Select or download this
```
CELOX-3.5.0
MAIN
```