Compactando arquivos e diretórios simultâneamente
Publicado por Sandro Marcell 28/05/2007
[ Hits: 4.533 ]
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
   }
}
Criando uma simples lixeira para o usuário [Melhorado]
Simples visualizador de arquivos texto
Compactando / descompactando arquivos (Melhorado)
Nenhum comentário foi encontrado.
IA Turbina o Desktop Linux enquanto distros renovam forças
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Atualizando o Fedora 42 para 43
Como saber se o seu e-mail já teve a senha vazada?
Como descobrir se a sua senha já foi vazada na internet?
Instalação dualboot Windows 11 e Debian 13 (0)
Programa fora de escala na tela do pc (33)
Eu queria adicionar a incon do wifi e deixa transparente no fluxbox no... (0)









