#!/bin/csh

foreach s ( `ls *BHZ*SAC | awk -F. '{print $8}'` ) 
set a = `ls *$s*BHZ*SAC | wc`
if ( $a[1] !=  1 ) then
  ls *$s*BHZ*SAC
endif
end
