Lendo o tamanho de seus arquivos

Lendo o tamanho de seus arquivos

Veja como ler o tamanho dos arquivos em seu servidor. Um simples código, lê o tamanho e informa para você.

Veja:

#!/usr/bin/perl

$arquivo = "/home/USUARIO/www/download/flashtrial.zip"; # caminho p/ o arquivo a ser lido

$tamanho=(-s "$arquivo"); # Este código 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 ~; # imprime o resultado
Tags: