#!/bin/sh
export LD_LIBRARY_PATH=$CSIAPPBASE/lib
if [ -d "$CSIAPPBASE/lib/5.8.9" ]; then
   export PERL5LIB=$CSIAPPBASE/lib/5.8.9/x86_64-linux-stdio:$CSIAPPBASE/lib/5.8.9:$CSIAPPBASE/lib/site_perl/5.8.9:$CSIAPPBASE/lib/site_perl/5.8.9/x86_64-linux-stdio
elif  [ -d "$CSIAPPBASE/lib/5.6.1" ]; then
   export PERL5LIB=$CSIAPPBASE/lib/5.6.1/i686-linux:$CSIAPPBASE/lib/5.6.1:$CSIAPPBASE/lib/site_perl/5.6.1:$CSIAPPBASE/lib/site_perl/5.6.1/i686-linux
else
   echo "Not able to run Cleanscape perl on this machine; contact support@cleanscape.net"
   exit 1
fi

$CSIAPPBASE/bin/perl -e 'use Tk;my $MW = MainWindow->new();my @families = $MW->fontFamilies;foreach my $family(@families) { print "$family\n" }'