perl - 用虚拟数据填充文件的一部分

Question

我有一个文件，其中包含许多较小文件的数据。我希望这个文件能够一次写入多次(文件的不同部分)。

我设想做的是在一个文件中存储许多 100MB 文件，并在单个文件中存储对这些部分开始和结束位置的引用。

我的问题是，将 100MB 字节附加到文件的最佳方法是什么，以便我可以在通过网络下载时用实际数据覆盖该虚拟数据。这样，如果另一个下载请求同时开始，它可以开始添加下一个 100MB。

有没有比简单地将 100MB 的 0 写入文件更好的方法呢？是否有一种方法可以更有效地为文件扩展分配的磁盘空间(请记住，它可能会被写入当前文件的先前字节)？

Answer 1

在某些系统(但可能不是全部)上，您可以 seek 越过文件末尾以创建一个带有空白空间的大文件。

$ perl -e 'open FOO,">/tmp/foo"; seek FOO,1E6,0; print "foo\n"; close FOO'
$ od -c /tmp/foo
0000000  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0
*
3641100   f   o   o  \n
3641104