Jam*_*bor 2 perl file command-line-interface
我知道如何在perl中读取|打开|打开文件.我想要实现的是这个; 当现有文件超过"x"大小时,如何创建新文件.例如,我有3MB的文件大小,在写入同一文件之前,检查大小,如果大小超过3MB,创建一个新的,如果需要chmod它,然后写.
我不知道我的问题是否清楚 -
小智 6
$size = -s '/path/to/file.txt';
if(($size / 1048576) > 3) { print "too big"; } else { do_something(); }
$size = -s '/path/to/file.txt';
if(($size / 1048576) > 3) {
print "too big";
}
else {
do_something();
}
$size = -s '/path/to/file.txt';
if(($size / 1048576) > 3) { print "too big"; } else { do_something(); }