[sisyphus] perl-PDL

[Serge]

[serge на lin01 serge]$ rpm -q perl-PDL
perl-PDL-2.340-alt3
[serge на lin01 serge]$ perldl
perlDL shell v1.32
---- Code:
        # Number of subdivisions for lines / surfaces.
        $size = 25;

        $cz = (xvals zeroes $size+1) / $size;  # interval 0..1
        $cx = sin($cz*12.6);    # Corkscrew
        $cy = cos($cz*12.6);
        line3d [$cx,$cy,$cz];   # Draw a line
        # [press 'q' in the graphics window when done]
---- Output:
Dims:  26  DLen:  208 
/usr/bin/perl: relocation error: /usr/lib/perl5/vendor_perl/i386-linux/auto/PDL/Graphics/OpenGL/OpenGL.so: undefined symbol: XOpenDisplay

Валится при любой попытке нарисовать график ...(demo 3d demo 3d2) 

Regards,
	Serge.