Select Code to Download

use File::Spec::Functions;

BEGIN {
...
        );
    }
}

Select or download this
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