Help for this page

Select Code to Download

Select or download this
```
undef $/;
$regel = <FH_input>
```

Select or download this

$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/