| Subject: | readline() respect $/ |
regarding readline() the POD says "Reads characters from the socket and
stops at \r\n, \n\r, \n, \r or \0."
Could it instead be made to work consistently with perl's own readline()
and respect $/ (or maybe take an arg)?
[Pseudo code logic for 'take an arg' option]
$ssl->readline($INPUT_RECORD_SEPARATOR);
sub readline {
if (@_) {
use $_[0]
}
else {
use \r\n, \n\r, \n, \r or \0
}
3rd idea is to set it via the object
$ssl->set_readline_eol_list($INPUT_RECORD_SEPARATOR); # respect $/
$ssl->set_readline_eol_list("\r\n", "\n\r", "\n", "\r", "\0"); # set back to
default value