Help for this page

Select Code to Download

Select or download this

    while (1) {
        eval {
...

        select undef, undef, undef, 1.00;
    }