> my( $one, $two ) = @{ ($q->dequeue_dontwait)[0] };
This is causing a compile error for me. I tried just [] as well.
[Sun Oct 27 10:31:57 2002] PolycomStatus.pm: syntax error at PolycomStatus.pm line
104, near "->dequeue_dontwait["
[Sun Oct 27 10:31:57 2002] PolycomStatus.pm: PolycomStatus.pm had compilation errors.
> use strict;
>
> (which you should probably always do anyway).
I'm running under use strict but for some reason I only get the refs error from my
test case and not from the .pm which houses the code I'm working on. (use strict is
declared in the .pm as well)
Here's the snip of code from my module...
while ( my( $host, $ret ) = @{ $q->dequeue_dontwait } ) {
my( $ret, $duration, $ip ) = $p->ping( $host );
push( @status, [ $host, $ret ] );
}
Cheers,
-J
