[Owfs-cvs] Using OW.pm in a loop fails with : Compilation segmentation fault

[Thomas <t-g...@ve...>]

Hi everybody,

I try to get data from different OW sources (tty, usb, and a NSLUG running 
owserver) using the perl module 0W.pm (version from owfs-2.6p6)

If I use OW.pm to select one of the ow-sources, everything works fine.

But if I use:

============= snip ================
foreach my $OWSource (@OWSources)
  {OW::init($OWSource);
   $log->debug("OWInit von OWSource => $OWSource");

   my $BusData = OW::get("/") or return ;
   $log->debug("Busdaten: $BusData");

OW::finish();
$log->debug(" OWFinish ");
sleep 2;
}
============= snap ================

I get: Compilation segmentation fault

and in the log-file:

2007/09/30 16:03:10 DEBUG> segfaulttest.pl:151 main:: - OWFS-Sources => 
192.168.0.22:3002 u0
2007/09/30 16:03:10 DEBUG> segfaulttest.pl:168 main:: - OWInit von OWSource => 
192.168.0.22:3002
2007/09/30 16:03:11 DEBUG> segfaulttest.pl:171 main:: - Busdaten: 
structure/,bus.0/,uncached/,settings/,system/,statistics/,10.CCFD24010800/,10.A20425010800/,10.019125010800/,10.717A25010800/,10.E99225010800/,10.E78925010800/,10.177125010800/,10.77FE24010800/,10.8FB950000800/,10.1F232C000800/,10.5F2525010800/,81.D64928000000/,alarm/,simultaneous/
2007/09/30 16:03:11 DEBUG> segfaulttest.pl:175 main:: - OWFinish 
2007/09/30 16:03:13 DEBUG> segfaulttest.pl:168 main:: - OWInit von OWSource => 
u0

So it crashes when it tries to initialise OW::init($OWSource) with the second 
ow-source. 

Did I misunderstand the use ow OW.pm ? Is it possible to give OW.pm a list of 
sources to initialise ? (tried it, but no avail)

Help very welcome !
Thomas