1: my $port, $host; 2: $host = shift || "localhost"; 3: $port = shift || 8000;