单行命令

perl6 -e ".say for Date.new(2016,11,1)..Date.new(2017,8,9)"

批量重命名文件：

for dir('.', test => *) -> $file {
   rename $file, $file.lc if $file.f;
}

 perl6 -e '.say for lines.unique'  page.txt