Compactando arquivos e diretórios simultâneamente
Publicado por Sandro Marcell 28/05/2007
[ Hits: 4.227 ]
Homepage: http://sanmarcell.wordpress.com
Um simples script em Tcl que compacta arquivos e diretórios simultâneamente.
Arquivos comuns são compactados no formato ".bz2"
Diretórios são compactados no formato ".tar.bz2"
Falou!!!
#!/usr/bin/tcl # # Compacte arquivos e diretórios simultâneamente. # # Autor: Sandro Marcell (sandro_marcell@yahoo.com.br) # # Uso: nome_do_scrpt arquivo1 [arquivoN] # # É possível o uso do metacaractere (*) if {$argc == 0} { puts stdout "\n>> Uso: [file tail $argv0] arquivo1 \[arquivoN\]\n" exit } proc Aguarde {} { puts stdout "Compactando..." sleep 1 } foreach A $argv { if {![file exists $A]} { puts stdout "-> Arquivo ou diretório não encontrado!" continue } elseif {![file owned $A]} { puts stdout "-> Sem permissão para compactar!" continue } if {[file isdirectory $A]} { Aguarde exec tar -cjf $A.tar.bz2 $A >& /dev/null puts stdout "-> Diretório compactado!" } else { Aguarde exec bzip2 -zfk9 $A >& /dev/null puts stdout "-> Arquivo compactado!" continue } }
Compactando / descompactando arquivos (Melhorado)
Convertendo escalas termométricas
Simples visualizador de arquivos texto
Nenhum comentário foi encontrado.
DOOM mais fácil que atacar imp pelas costas
Atualizar o macOS no Mac - Opencore Legacy Patcher
Crie alias para as tarefas que possuam longas linhas de comando - bash e zsh
Criando um gateway de internet com o Debian
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Instalando Zoom Client no Debian 12
Instalando Discord no Debian 12
Wifi desativando no ubuntu 24.04 (5)
Gostei assim sem formatação (13)