Help for this page

Select Code to Download

Select or download this

format SIMPLE_TOP=
______________________________________________________________________
+_
...
    $varible,   $varible, $varible,  $varible
______________________________________________________________________
+_
.

Select or download this

use Carp;
    sub swrite {
...
 @<<<  @|||  @>>>
 END
    print $string;