untar.jl

# This script untars all the .tar file to their own folers
# 
# for all tar files
#   if not tarred, i.e., no dir with same name
#       tar it to its temp folder
#       rename this temp folder to filename

for tar in map(x->x[1:end-4], filter(x->isfile(x) && length(x) > 4 && x[end-3:end] == ".tar", readdir()))
    if(!isdir(tar))
        isdir("$tar.temp") && rm("$tar.temp") 
        mkdir("$tar.temp")
        run(`tar -xf $tar.tar -C $tar.temp`)
        mv("$tar.temp", tar)
    end
end