PDL::Graphics::LUT is a Perl module that provides access to a number of look-up tables.
# what tables are available
my @tables = lut_names();
# get the reversed colour table 'smooth',
# with the gamma intensity ramp
my ( $l, $r, $g, $b ) = lut_data( 'smooth', 1, 'gamma' );
# use the table idl5 in ctab
ctab( lut_data('idl5') );
PDL::Graphics::LUT contains a number of colour look-up tables (in rgb format) and intensity ramps, and provides routines to access this data. The format of the data is suitable for use by "ctab" in PDL::Graphics::PGPLOT.
Unlike the initial release of the package, the data tables are now stored within the PDL distribution (see $tabledir and $rampdir) rather than in the module itself. Changes to these directories will be picked up on the next call to one of the package functions.