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
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