Olá! Wednesday, 18 de January de 2017.



Dicas CódigoFonte.net
Friday, 09 de January de 2004

Veja o tamanho de seus arquivos em CGI / Perl

Opa pessoal.

Hoje irei ensinar como ler o tamanho dos arquivos em seu servidor.

Um simples código, lê o tamanho e informa para você.

  1.  
  2.  
  3. #!/usr/bin/perl
  4.  
  5. $arquivo = "/home/USUARIO/www/download/flashtrial.zip"; # caminho p/ o arquivo a ser lido
  6.  
  7. $tamanho=(-s "$arquivo"); # este código que faz a leitura do tamanho
  8.  
  9. print "Content-type: text/html"; # indico o tipo de documento (texto html)
  10.  
  11. print qq~ o arquivo $arquivo tem $tamanho bytes ~; # imprimo o resultado
  12.  
  13.  


Simples não?

Até mais galera.

Comentários do artigo [Novo comentário]

Nenhum comentário, seja o primeiro a comentar.
Para adicionar um comentário você deve efetuar o login


Gostou do CódigoFonte.net? Quer indicar a um amigo?
Preencha os campos a seguir.
Seu Nome:
Seu E-mail:
E-mail de seu Amigo:


CodigoFonte.net » CodigoFonte.eti.br » Meu Mural » Competiva - Criação de Sites » Todos os Direitos Reservados © 2002/2010