@muscles = ("left_abductor_digiti_minimi_hand", "left_abductor_pollicis_brevis", "left_abductor_pollicis_longus","left_anconeus", "left_biceps_brachii","left_brachialis","left_brachioradialis","left_coracobrachialis");

#@bones = ("FEMUR","FIBULA","HIP","PATELLA","TIBIA");
@bones = ("GRACILIS","POPLITEUS","SEMIMEMBRANOSUS","SEMITENDINOSUS");

@missing = ("LUNATE","METACARPAL_III","METACARPAL_IV","METACARPAL_V");
$LOOP= scalar(@bones);
$start_dir = "/hpc_atog/bshi013/SPARC/ANATML/LEFT_LOWER_LIMB/MUSCLES/";

for($i=0; $i < $LOOP; $i++){
	chdir $start_dir;
	system ('pwd');
	chdir $bones[$i];
	system ('pwd');


	system('cp', $bones[$i].".IPNODE", $bones[$i].".ipnode");
	system('cp', $bones[$i].".IPELEM", $bones[$i].".ipelem");

}