diff options
| author | Max Dymond <max.dymond@metaswitch.com> | 2017-07-05 10:12:10 +0100 |
|---|---|---|
| committer | Daniel Stenberg <daniel@haxx.se> | 2017-07-07 11:00:26 +0200 |
| commit | 06a6feba9de67733ef943ed9f64076923dc5f747 (patch) | |
| tree | 11504464bf448538c937be594b018d9e89c2b766 /tests/serverhelp.pm | |
| parent | efedafe48a390e7f762588909e5511a76353e0d9 (diff) | |
test1452: add telnet negotiation
Add a basic telnet server for negotiating some telnet options before
echoing back any data that's sent to it.
Closes #1645
Diffstat (limited to 'tests/serverhelp.pm')
| -rw-r--r-- | tests/serverhelp.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/serverhelp.pm b/tests/serverhelp.pm index 36fb89ed2..a83a12584 100644 --- a/tests/serverhelp.pm +++ b/tests/serverhelp.pm @@ -105,7 +105,7 @@ sub servername_str { $proto = uc($proto) if($proto); die "unsupported protocol: '$proto'" unless($proto && - ($proto =~ /^(((FTP|HTTP|HTTP\/2|IMAP|POP3|SMTP|HTTP-PIPE)S?)|(TFTP|SFTP|SOCKS|SSH|RTSP|GOPHER|HTTPTLS|DICT|SMB|SMBS))$/)); + ($proto =~ /^(((FTP|HTTP|HTTP\/2|IMAP|POP3|SMTP|HTTP-PIPE)S?)|(TFTP|SFTP|SOCKS|SSH|RTSP|GOPHER|HTTPTLS|DICT|SMB|SMBS|TELNET))$/)); $ipver = (not $ipver) ? 'ipv4' : lc($ipver); die "unsupported IP version: '$ipver'" unless($ipver && |