/* begin jf_libHelpers.mel Jean-Francois Fortin -=WHAT IT DOES=- series of script to help Tds -=RETURN=- -=NONE=- -=EXAMPLES=- -=REQUIRES=- -=NONE=- -=UPDATES=- end */ ////////////////////////////////////////////////////////////////////////// // global proc string[] jf_sepStringArr(string $findItem, string $strArr[]) // match a word in a array ////////////////////////////////////////////////////////////////////////// global proc string[] Ap_sepStringArr(string $findItem, string $strArr[]) { string $matchItem[]; int $counter = 0; int $itMatch; for ($str in $strArr) { $itMatch = `gmatch $str ("*"+$findItem+"*")`; if ($itMatch) { $matchItem[$counter++] = $str; } } return $matchItem; } ////////////////////////////////////////////////////////////////////////// // global proc string[] jf_removeArr(int $index, string $arr[]) // remove a element at index in a array ////////////////////////////////////////////////////////////////////////// global proc string[] jf_removeArr(int $index, string $arr[]) { string $res[]; if( $index <= 0 ) { $index = abs($index); for( $i = size($arr); $i >= $index; $i-- ) { print $arr[$i];print"\n"; $res[size($res)] = $arr[$i]; } return stringArrayRemove($res, $arr); } for( $i = $index; $i < size($arr); $i++ ) { $res[size($res)] = $arr[$i]; } return $res; } ////////////////////////////////////////////////////////////////////////// // global proc string[] jf_removePrefix(string $arr[], int $index) // remove prefix ////////////////////////////////////////////////////////////////////////// global proc string[] jf_removePrefix(string $arr[], int $index) { string $res[]; for( $ar in $arr ) { int $strCnt = size($ar); $res[size($res)] = `substring $ar $index $strCnt`; } return $res; } ////////////////////////////////////////////////////////////////////////// // global proc string[] jf_revArr(string $selNodes[]) // reverse your array from end to start // string arr[] = {"t","e","s"}; // result {"s","e","t"}; ////////////////////////////////////////////////////////////////////////// global proc string[] jf_revArr(string $selNodes[]) { string $revArr[]; int $selNodesCnt = (size($selNodes)-1); for ($i = $selNodesCnt, $j = 0; $i >= 0; $i--) { $revArr[$j++] = $selNodes[$i]; } return $revArr; }