$server = new IO::Socket::INET Listen => 1, LocalPort => 25;
$server = IO::Socket::INET->new(Listen => 1, LocalPort => 25);