Not to sound too fussy here, but my experience so far with Net::Jabber is less than great. A simple script using it produces several errors stemming from careless code in XML::Stream::Parser:
"my" variable $file masks earlier declaration in same scope at /usr/lo
+cal/lib/perl5/site_perl/5.6.1/XML/Stream/Parser.pm line 298.
Use of uninitialized value in string ne at /usr/local/lib/perl5/site_p
+erl/5.6.1/XML/Stream/Parser.pm line 134.
Use of uninitialized value in split at /usr/local/lib/perl5/site_perl/
+5.6.1/Net/Jabber.pm line 759.
Is this package supported? If so, why are errors like the first one still present? (It results from this code:
sub parsefile {
my $self = shift;
my $file = shift;
open(FILE,$file);
my $file;
while(<FILE>) { $file .= $_; }
...
Note the two appearances of "my $file".
Edit by tye to replace PRE tags with CODE tags