my $size = ((stat($file))[7]) / (1000);