Compactando arquivos e diretórios simultâneamente
Publicado por Sandro Marcell 28/05/2007
[ Hits: 4.481 ]
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]
Convertendo escalas termométricas
Nenhum coment�rio foi encontrado.
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Realizar overclock no Miyoo Mini (plus ou normal)
Otimização de memória para máquinas modestas
Direcionar uma URL para Outra No Mikrotik (0)
linux mint reconhece microfone de lapela como fone de ouvido sem micro... (1)