equal
deleted
inserted
replaced
59 # attempt to generalize some interface differences between |
59 # attempt to generalize some interface differences between |
60 # IO::Socket::{INET,SSL}; currently we need to pass an SSL specific argument |
60 # IO::Socket::{INET,SSL}; currently we need to pass an SSL specific argument |
61 # when closing an SSL Socket to avoid affecting the socket in |
61 # when closing an SSL Socket to avoid affecting the socket in |
62 # parent(s)/children; passing unknown arguments to the 'close' method of non |
62 # parent(s)/children; passing unknown arguments to the 'close' method of non |
63 # SSL Sockets would result in an runtime error; error reporting is also done |
63 # SSL Sockets would result in an runtime error; error reporting is also done |
64 # differently; note that you cant mix non/SSL Sockets since currently we |
64 # differently; currently we achieve that by setting @ISA in the constructor to |
65 # achieve it by modifying @ISA which is a class variable in the constructor; |
65 # either qw(IO::Socket::INET) or qw(IO::Socket::SSL); that means you cant mix |
66 # the right thing to do would probably be to use IO::Socket::SSL for non SSL |
66 # SSL and non SSL Sockets in the program (@ISA is a class variable); using just |
67 # Sockets too -> TODO: how? ;) |
67 # IO::Socket::SSL would (probably) require more coding and certainly more |
|
68 # background knowledge and might not even address the problems we work around |
|
69 # here |
68 package IO::Socket::hlog; |
70 package IO::Socket::hlog; |
69 |
71 |
70 use IO::Socket::INET; |
72 use IO::Socket::INET; |
71 use IO::Socket::SSL; |
73 use IO::Socket::SSL; |
72 |
74 |