Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use IO::Socket::INET;
...
        $s->accept();
    }
}

Select or download this

$VAR1 = [
          bless( \*Symbol::GEN0, 'IO::Socket::INET' ),
...
$VAR1 = [
          bless( \*Symbol::GEN1, 'IO::Socket::INET' )
        ];