my $size = -s "filename";
print $size;