如何将输入作为stdin管道传输到src_block

Question

考虑以下使用<STDIN>的org.babel中的perl片段。

** Ans 2
   #+begin_src perl :results output
     use Math::Trig;
     $rad = <STDIN>;
     $circumference = 2*pi*$rad;
     print "Circumference of circle is $circumference";
   #+end_src

是否可以将输入从另一个块管道传输到此块？

说：

#+begin_src text :name test-input
  12.5
#+end_src

Answer 1

您可以将$rad从#+results块直接传递到perl脚本：请参阅手册中的将参数传递到代码块。

这将使

#+begin_src perl :results output :var rad=test-input

使用作为输入

#+results: test-input
:  12.5