Thanks David
It looks like there is already such a support system for PDL
at SF.net here:
http://sourceforge.net/tracker/?atid=100612&group_id=612&func=browse
look pretty cool too...
--Mark R Baker
________________________________
From: David Mertens <[email protected]>
To: Ingo Schmid <[email protected]>
Cc: perldl <[email protected]>
Sent: Tuesday, January 24, 2012 9:31 AM
Subject: Re: [Perldl] slicing has problem with whitespaces
Ingo, I've filed a ticket for you at SF.net here:
https://sourceforge.net/tracker/?func=detail&aid=3479009&group_id=612&atid=100612
On Tue, Jan 24, 2012 at 11:11 AM, Ingo Schmid <[email protected]> wrote:
Hi,
>a minor bug but annoying to debug ... took me about an hour to
find what's wrong ...
>
>PDL (latest build) produced the following error :
>
>print $cab2->dummy(-1,$$p{ky})->info;
>
>$cabc2->info: PDL: Double D [128,6,1,2,8]
>
>$$p{ky} is ' 128 ' - single quotes are only to show the padding white space.
>
>
>Invalid slice str ',,,,,* 128 ': ' 128 ' at
Basic/Core/Core.pm.PL (i.e. PDL::Core.pm) line 396
> PDL::Core::barf('Invalid slice str \',,,,,* 128 \': \' 128
\'') called at Basic/Core/Core.pm.PL (i.e. PDL::Core.pm) line 1592
> PDL::dummy('PDL=SCALAR(0x1df98c0)', -1, ' 128 ') called at
/home/ingo/perl/reco_utils.pm line 84
> reco_utils::epi('PDL=SCALAR(0x1df9998)',
'PDL=SCALAR(0x1df98a8)', 'PDL=SCALAR(0x1df9d28)',
'HASH(0x1dc9830)') called at /home/ingo/perl/reco_utils.pm line 364
> reco_utils::fou('PDL=SCALAR(0x1df9bf0)', 'HASH(0x1dc9830)',
'PDL=SCALAR(0x1df9f38)') called at
/home/ingo/perl/offline-reco.pl line 263
> at Basic/Core/Core.pm.PL (i.e. PDL::Core.pm) line 396
> PDL::Core::barf('Invalid slice str \',,,,,* 128 \': \' 128
\'') called at Basic/Core/Core.pm.PL (i.e. PDL::Core.pm) line 1592
> PDL::dummy('PDL=SCALAR(0x1df98c0)', -1, ' 128 ') called at
/home/ingo/perl/reco_utils.pm line 84
> reco_utils::epi('PDL=SCALAR(0x1df9998)',
'PDL=SCALAR(0x1df98a8)', 'PDL=SCALAR(0x1df9d28)',
'HASH(0x1dc9830)') called at /home/ingo/perl/reco_utils.pm line 364
> reco_utils::fou('PDL=SCALAR(0x1df9bf0)', 'HASH(0x1dc9830)',
'PDL=SCALAR(0x1df9f38)') called at
/home/ingo/perl/offline-reco.pl line 263
>Died at /home/ingo/perl/offline-reco.pl line 351.
>
>The following works:
>
>print $cab2->dummy(-1,($$p{ky})*1.)->info;
>
>
>
>
>_______________________________________________
>Perldl mailing list
>[email protected]
>http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
>
>
--
Sent via my carrier pigeon.
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
