Compactando arquivos e diretórios simultâneamente
Publicado por Sandro Marcell 28/05/2007
[ Hits: 4.298 ]
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 } }
Simples visualizador de arquivos texto
Criando uma simples lixeira para o usuário [Melhorado]
Compactando / descompactando arquivos (Melhorado)
Nenhum comentário foi encontrado.
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Flatpak: remover runtimes não usados e pacotes
Mudar o gerenciador de login (GDM para SDDM e vice-versa) - parte 2
Como atualizar o Debian 8 para o 10 (10)
Dica sobre iptables ACCEPT e DROP (6)
NGNIX - Aplicar SNAT para evitar roteamento assimetrico (29)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta