#

unalias ls

set years = `echo 1994 1995 1996 1997 1998 1999`
foreach y ( $years )

    cd $y
    set dirs = `ls`
    foreach d ( $dirs )
	    set olddir = `echo /puu/ftpdpm/daily_images/"$y"/"$d"`
	    ls $olddir >& /dev/null
	    if ( $status == 0 ) then
		cd $d
		echo mv "$olddir" .
		ls "$olddir"/* >& /dev/null
		if ( $status == 0 ) then
		    echo 'Moving...'
		    mv "$olddir"/* .
		endif
		cd ..
	    endif
    end
    
    cd ..
end

cd ~/Web_files
mkftpdpm
mkftpdpmF
mkftpdpm_raw