- prefix=`echo $phase_file_name | sed "s/__[0-9].*/__/"`
- else
- if [[ ! -z `echo "$phase_file_name" | grep "[0-9]-.*\]"` ]]
- then
- if [[ ! -z `echo "$phase_file_name" | grep "[0-9][0-9]-.*\]"` ]]
- then
- prefix=`echo $phase_file_name | sed "s/[0-9][0-9]-.*//"`
- else
- prefix=`echo $phase_file_name | sed "s/[0-9]-.*//"`
- fi
- else
- prefix="NONE"
- fi
+ #echo $phase_file is 4D
+ continue;
+ fi;
+
+ phase_file_name=`basename $phase_file .mhd`
+# if [[ ! -z `echo "$phase_file_name" | grep "__[0-9]"` ]]
+# then
+# prefix=`echo $phase_file_name | sed "s/__[0-9].*/__/"`
+# else
+# if [[ ! -z `echo "$phase_file_name" | grep "[0-9]-.*\]"` ]]
+# then
+# if [[ ! -z `echo "$phase_file_name" | grep "[0-9][0-9]-.*\]"` ]]
+# then
+# prefix=`echo $phase_file_name | sed "s/[0-9][0-9]-.*//"`
+# else
+# prefix=`echo $phase_file_name | sed "s/[0-9]-.*//"`
+# fi
+# else
+# prefix="NONE"
+# fi
+# fi
+
+ # preffix: grep sequence of characters followed by sequence of numbers and remove sequence of numbers
+ # prefix=`echo $phase_file_name | grep -o "\(^[[:alpha:][:punct:]]*\)\([[:digit:]\.\_\-]\+\)" | sed 's/\(^[[:alpha:][:punct:]]*\)\([[:digit:]\.\_\-]\+\)/\1/'`
+ prefix=`echo $phase_file_name | grep -o "\(^[[:alpha:][:punct:]]*\)\([[:digit:]]\+\)\([\.\_\-]*\)"`
+ prefix=`echo $prefix | sed 's/^\-\+//' | sed 's/\(^[[:alpha:][:punct:]]*\)\([[:digit:]]\+\)\([\.\_\-]*\)/\1/'`
+ if [[ -z $prefix ]]
+ then
+ prefix="NONE"