Friday, 09 de January de 2004
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ê.
#!/usr/bin/perl
$arquivo = "/home/USUARIO/www/download/flashtrial.zip"; # caminho p/ o arquivo a ser lido
$tamanho=(-s "$arquivo"); # este código que faz a leitura do tamanho
print "Content-type: text/html"; # indico o tipo de documento (texto html)
print qq~ o arquivo $arquivo tem $tamanho bytes ~; # imprimo o resultado
Simples não?
Até mais galera.
Nenhum comentário, seja o primeiro a comentar.
Para adicionar um comentário você deve efetuar o
login