POE-Component-IRC & whois

[oneofthem]

Hello,

I am trying to use the irc_whois event to see if a nick is identified to
services.

The manual states:

irc_whois
Sent in response to a 'whois' query. ARG0 is a hashref, with the following keys: <cut>

I am trying to do it this way:

sub on_whois{
my ( $kernel, %myhash) = @_[KERNEL, ARG0];
my $nick = $myhash{'nick'};
my $ident = $myhash{'identified'};

print $nick.' - ident state is:'.$ident;
}

But it seems that $nick and $ident are empty.

Can somebody help me do it the right way?

Thanks

 

[DJ Stunks]

Hello,

I am trying to use the irc_whois event to see if a nick is identified to
services.

The manual states:

note: hashref

I am trying to do it this way:

sub on_whois{
my ( $kernel, %myhash) = @_[KERNEL, ARG0];

$_[ARG0] is a hash reference, not a hash.

try this instead:

my ($kernel,$hashref) = @_[ KERNEL,ARG0 ];

my $nick = $myhash{'nick'};
my $ident = $myhash{'identified'};

now these need to use the reference, not the hash:

my ($nick, $ident) = @{ $hashref }{ qw[nick identified] };

try that.

-jp

 

[oneofthem]

Thank you very much