Eliminando caracteres indesejados
Publicado por Edvaldo Silva de Almeida Júnior 27/12/2006
[ Hits: 5.954 ]
Homepage: http://emeraldframework.net
Não sei quanto a vocês, mas eu me sinto incomodado com aqueles nomes de arquivos cheios de espaços e caracteres estranhos.
Para mim um bom nome de arquivo contém apenas [A-Za-z0-9\.], ou seja, alfanuméricos e o ponto separando o nome da extensão.
Se você pensa como eu e acha demorado mudar isso arquivo por arquivo, esse script Perl vai facilitar a conversão. Claro que ainda não está perfeito, e aceito sugestões para deixá-lo cada vez melhor.
#!/usr/bin/env perl my $dh = "lista"; my $teste=opendir($dh,"."); if ($teste) { while ( my $nomeant=readdir($dh)) { my $nomenovo=$nomeant; $nomenovo =~ s/[^A-Za-z0-9\.]//g; print $nomeant; print " ==> "; print $nomenovo; print "\n"; rename( $nomeant , $nomenovo ); } } else { print "Falhou...\n"; }
Script para adicionar sites ao Squid
FTP – Script para adicionar e remover usuários via WEB
Conversão de textos UTF-8 para ISO8859-1
Inserindo sites em Lista do Squid
Nenhum coment�rio foi encontrado.
Comparação entre os escalonadores BFQ e MQ-Deadline (acesso a disco) no Arch e Debian
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
Overclocking Permanente para Drastic no Miyoo Mini Plus
Problemas de chaves (/usr/share/keyrings) no Debian
Converter os repositórios Debian para o novo formato com as chaves
Problema com o Centro de Aplicativos Ubuntu 25.04 (2)
E aí? O Warsaw já está funcionando no Debian 13? (8)
linux mint reconhece microfone de lapela como fone de ouvido sem micro... (6)