use File::Spec::Functions; BEGIN { if (exists $ENV{PAR_PROGNAME}) { use Config (); $ENV{PERL_TCL_DL_PATH} = catfile( $ENV{PAR_TEMP}, 'tkkit.' . $Config::Config{dlext}, ); } } #### pp -o sf -z 9 -f PodStrip -M utf8 -M Tk::Text -l /System/Library/Tcl/8.4/tkdnd2.8/libtkdnd2.8.dylib -l /System/Library/Tcl/8.4/tkdnd2.8/pkgIndex.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd_compat.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd_generic.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd_macosx.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd_unix.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd_windows.tcl -l /System/Library/Tcl/8.4/tkdnd2.8/tkdnd.tcl sfh2a_tkx.pl