AWK Curry函数-函数可以返回函数吗？

Question

我目前正在处理一个相当混乱的AWK脚本，并且我正在尝试对其进行改进（主要是因为我想提高自己的Awk脚本技术）

我意识到没有办法在Awk或Gawk中进行面向对象的编程，但是至少有咖喱函数可以吗？ 就像从函数内部返回函数一样？ （不返回执行函数的结果，而是返回可以执行的函数）

我发现了一个Stack Overflow帖子 ，其中@GreenFox表明可以使用存储在变量中的函数名称执行函数。 他发布的示例如下：

function foo(s){print "Called foo "s}
function bar(s){print "Called bar "s}
{
    var = "";
    if(today_i_feel_like_calling_foo){
        var = "foo";
    }else{
        var = "bar";
    }
    @var( "arg" ); # This calls function foo(), or function bar() with "arg"
}

我想知道的是是否有可能从另一个函数返回一个函数。

例如，一个函数接受可以在awks printf用作格式的字符串，然后返回一个接受其他两个参数的函数，并实质上执行printf( fmt_from_parent_func, sub_func_arg1, sub_func_arg2 ) 。

这是我尝试完成以下任务的尝试：

#! /usr/local/bin/awk -f

function setFmt ( fmt ){
  function _print ( var, val ){
    printf ( fmt ? fmt : "%-15s: %s\n" ), str1, str2
  }
  return @_print
}
BEGIN {
  fmtA = setFmt("%-5s: %s\n")
  @fmtA("ONE","TWO")
}

导致错误：

awk: ./curry.awk:4:   function _print ( var, val ){
awk: ./curry.awk:4:   ^ syntax error
awk: ./curry.awk:4:   function _print ( var, val ){
awk: ./curry.awk:4:                               ^ syntax error
awk: ./curry.awk:6:     printf ( fmt ? fmt : "%-15s: %s\n" ), str1, str2
awk: ./curry.awk:6:                                                     ^ unexpected newline or end of string
awk: ./curry.awk:11:   fmtA = setFmt("%-5s: %s\n")
awk: ./curry.awk:11:                              ^ unexpected newline or end of string
awk: ./curry.awk:12:   @fmtA("ONE","TWO")
awk: ./curry.awk:12:                     ^ unexpected newline or end of string

如果有人知道这是完全有可能的（林先生开始看到我自己），并且知道一种达到这种效果的方法。那真是太棒了。

谢谢！

Answer 1

使用GNU awk，您可以将函数的名称作为字符串从另一个函数返回，但是您不能在另一个函数中声明一个函数，也不能在任何awk中返回一个函数（或数组）-您可以从一个函数返回的所有内容awk中的是标量值（即数字或字符串）。

这是您要执行的操作：

$ cat tst.awk
function _print ( var, val ){
  printf _print_fmt, var, val
}

function setFmt ( fmt ){
  _print_fmt = (fmt ? fmt : "%-15s: %s\n" )
  return "_print"
}

BEGIN {
  fmtA = setFmt("%-5s: %s\n")
  @fmtA("ONE","TWO")
}

$ awk -f tst.awk
ONE  : TWO