#!/usr/bin/env raku
sub MAIN(
 $filename where *.IO.f  #= Japanese source file to be turned to canonical form
) {
   $filename.IO.extension('raku', :0parts).spurt: $filename.IO.slurp.AST("JA").DEPARSE
}