Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -le
    "my $old =
    ...
    20---+----30---+----40---+----50---+----60---+----70---+----80---+----
    +90---+----200--+----10---+----20---+----<
    >|---+----10---+----20---+----30---+----40---+----50---+----60---+----
    +70---+----80---+----90---+----100--+----10---+----
    20---+----30---+----40---+----50---+----60---+----70---+----80---+----
    +90---+----200--+----10---+----20---+----<