使用SQLite和Perl从功能周期中选择一个随机行

使用SQLite和Perl从功能周期中选择一个随机行