如何使用perl脚本在csv文件中生成随机日期？

我以前没有使用过Perl脚本。下面提到的是我在csv文件中所需的输出

email_id,          CVupload_date,Login_date,Reg_date
example1@gmail.com,10-10-2010,19-5-2014,1-1-2010
example2@gmail.com,15-1-2011,19-5-2014,10-2-2010
example3@gmail.com,10-11-2012,19-5-2014,13-10-2011

---

有人能帮我用Perl脚本生成这样的csv文件吗。我需要在此文件中添加多条记录。我刚刚给出了一个文件格式的示例。在您的帮助下，我将尝试了解Perl脚本的工作原理

您以前使用过Perl吗？您安装了Perl吗？您知道如何执行Perl脚本吗？你知道如何从CPAN安装东西吗

use strict;
use warnings;
use feature qw/say/;
say 'email_id,          CVupload_date,Login_date,Reg_date';
for (1..30) {
    say 'example', $_, '@gmail.com,25-5-2004,22-6-2014,16-11-2003'; # guaranteed random, generated by random.org
}

如果以上所有问题的答案都是“不”——这似乎有点雄心勃勃。如果以上任何/大部分问题的答案都是“是”，那么你可能会很幸运

是您可能希望用于写入CSV的第三方模块

您需要做的是将所需的数据构建到一个数组中，然后使用Text:：csvxs将该数组打印到一个文件中

摘要的最后一段显示了如何将数据打印到CSV

您可以将数据存储在数组中，因此数组中的每个项目表示CSV中的每一行，行数组中的每个项目表示行中的每一列：

[
    [ row1xcol1, row1xcol2, row1xcol3 ],
    [ row2xcol1, row2xcol2, row2xcol3 ],
    ...
]

如果您确实尝试了这一点——为什么不尝试呢，这是一次很好的学习体验——请帮自己一个忙，并在脚本顶部添加以下两个pragma：

use strict;
use warnings;

---

它们有助于突出愚蠢的错误，否则这些错误很容易犯。

参考当然是我通常会投赞成票的。但是-1用于拖拽OP。我认为假设他/她有真正的需要是合理的，但对堆栈溢出的含义理解不足。这不是犯罪。嗨，Oesor，我刚听到你说的话。有没有办法随机生成日期？有。（通过谷歌搜索“perl random”找到）