#!/usr/bin/env perl6

use Text::CodeProcessing;

#| Extract content of code chunks in a Markdown, org-mode, or Pod6 file.
sub MAIN(
        Str $inputFileName where *.IO.f,   #= Input file name.
        :o(:$output) = Whatever,           #= Output file; if not given the output file name is the input file name concatenated with "_tangled".
         ) {
    return FileCodeChunksExtraction( $inputFileName, outputFileName => $output, :noteOutputFileName)
}
