#!/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 $ScreenWidth  = $MW -> screenwidth();my $ScreenHeight = $MW -> screenheight();print "$ScreenWidth"."x$ScreenHeight\n";'
