如何使用AWK方法在BASH脚本上实现Startswith函数

Question

我正在尝试使用AWK在BASH脚本中实现Startswith函数，但这是行不通的。

https://www.gnu.ornu.or.or.or.or.or.or.orgg/software/gawk/手动/html_node/string-functions.html

#! /bin/bash


starts_with()
{
    local string=$1
    local substring=$2
    
    local index=$(printf "%s" "$string" | awk 'BEGIN { print index("$string", "$substring") }')
    
    if [[ "$index" == "1" ]]
    then
        echo "true" : $string : $substring
    else
        echo "false" : $string : $substring
    fi
}

starts_with key1="value" key1=
starts_with key2="value" wrong_key=

这是输出：

false : key1=value : key1=
false : key2=value : wrong_key=

但是尴尬页面说：

index(in, find)

    Search the string in for the first occurrence of the string find, and return the position in characters where that occurrence begins in the string in. Consider the following example:

    $ awk 'BEGIN { print index("peanut", "an") }'
    -| 3

    If find is not found, index() returns zero.

    With BWK awk and gawk, it is a fatal error to use a regexp constant for find. Other implementations allow it, simply treating the regexp constant as an expression meaning ‘$0 ~ /regexp/’. (d.c.)

上面的starts_with_with函数中有什么问题以及如何修复？

Answer 1

当您可以直接在bash中进行awk使用awk毫无意义吗？

#!/bin/bash
starts_with() {
    local string="$1"
    local substring="$2"

    if [[ $string == "$substring"* ]]
    then
        echo "true : $string : $substring"
    else
        echo "false : $string : $substring"
    fi
}

Answer 2

awk 'BEGIN { print index("$string", "$substring") }'

您无法在gnu awk命令中使用这样的shell变量，请考虑简单的示例

string="HELLOWORLD" && awk 'BEGIN{print "$string"}' emptyfile.txt

输出

$string

观察出现文字$ string出现，请使用-V，如果您想要将浮动在壳中浮动的变量浮动到gnu awk命令例如

string="HELLOWORLD" && awk -v s=$string 'BEGIN{print s}' emptyfile.txt

输出

HELLOWORLD

（在GNU AWK 5.0.1中测试）

Answer 3

或导出它，如果您不介意额外的键入：

export string="HELLOWORLD" && mawk '

BEGIN { 
       print ENVIRON["string"]
}'

HELLOWORLD

如果您不想导出，这也有效，我想

% string2="HELLOWORLD" mawk '

  BEGIN{ 

    print ENVIRON["string2"] 

  }' | gtee >( gpaste - \
    \
     | gsed -zE 's/^/ orig from pipe :: /' >&2;) | gcat -n       
           
     1  HELLOWORLD
 orig from pipe :: HELLOWORLD 

我不知道Linux的剪贴板机制和其他人如何工作，但是如果您恰好使用macOS，以及您想带入的外壳变量并不过于复杂，这是另一种方法：

pbcopy <<<"${TERM_SESSION_ID}" ;

mawk 'BEGIN { 
              (__=" pbpaste ") | getline _;
         close(__) 

print "pasting via macos clipboard ::", (_) }' | lgp3

pasting via macos clipboard :: BEC24EEE-B6B3-4862-A286-1953FB6438A7

如果您喜欢getline是单个语句，那么也许

 mawk ' BEGIN { 
 
   printf(" pasting via macos clipboard :: %*s",
            close((__="pbpaste")|getline _)<"",_) 
 
 }' | lgp3 

 pasting via macos clipboard :: BEC24EEE-B6B3-4862-A286-1953FB6438A7