Thread SSL Response in XML::Simple (14 answers)
Opened by cohama at 2011-10-10 13:44

cohama
 2011-10-17 11:58
#153255 #153255
User since
2011-08-16
102 articles
BenutzerIn

user image
Hallo zusammen,

leider habe ich nach wievor CPAN:XML::Simple nicht richtig nutzen k├Ânnen. Der Fehler lautet:
Can't call method "XMLin" without a package or object reference at line ..
Vielleicht ist jemand so nett und schaut meine Zeilen durch? ;-)

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
use IO::Socket::SSL;					# TCP/IP sockets
use XML::Simple; # basic operation in terms of XML
#####################
# XML Parameter
#####################
my $refXML;
my $tempXML;
my $XMLcontent = "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n";
###########################
my $host = '192.168.1.15';
my $port = 12431; # selected-Port
my $uname = "foobar";
my $pw = "foobarPW";
my $protoVer = "31"; # Protocol Version
my $timer = 10;
my $seqid = 911;
#####################################
my $socket = IO::Socket::SSL->new(PeerAddr=>$host,PeerPort=>$port,Timeout=>$timer);
#######################################
$socket->print(qq{<Open seq="$seqid" protocolVersion=$protoVer username="$uname" password="$pw"/>\0});
##########################################
$tmpXML = join('',$socket->getlines);
$refXML = $tmpXML->XMLin($XMLcontent, KeepRoot => 1);

View full thread SSL Response in XML::Simple