Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
my $combine = "$file1$marker$file2" =~ s/(.*)\K\Q$marker\E\1//sr;

print $combine;

Select or download this
```
one
two
...
five
six
seven
```