global proc asScriptExampleFilesLocatorProc (){} global proc string asGetScriptExampleFilesLocation () { string $whatIs=`whatIs asScriptExampleFilesLocatorProc`; string $fullPath=`substring $whatIs 25 999`; string $buffer[]; int $numTok=`tokenize $fullPath "/" $buffer`; int $numLetters=size($fullPath); int $numLettersLastFolder=size($buffer[$numTok-1]); string $scriptLocation=`substring $fullPath 1 ($numLetters-$numLettersLastFolder-1)`; return $scriptLocation; } string $buffer[]; tokenize `asGetScriptExampleFilesLocation` "/" $buffer; string $asPath=""; for ($i=0;$i