Question

嗨，我是shell编程新手，希望你能引导我一起感谢。

您好我需要一个功能来搜索.txt文件中的书名或作者，并回显以下内容

Title:*Enter*
Author:Scissorhands

找到3记录： C ++ for dummies，John Scissorhands，15.01美元，10,5美元 Java for dummies，Mary Scissorhands，16.02美元，20,15 VB.NET for dummies，Edward Scissorhands，17.03美元，30,25

例如

Found 3 records : 
C++ for dummies, John Scissorhands, $15.01, 10, 5 
Java for dummies, Mary Scissorhands, $16.02, 20, 15 
VB.NET for dummies, Edward Scissorhands, $17.03, 30, 25

我的文件格式如下

图书名称：作者：价格：数量：已售出数量

哈利波特：詹姆斯：12.99：197：101

function Search_book
{
 FILE="/home/student/Downloads/BookDB.txt"
 echo found 1 records : $FILE contents
 cat FILE
}

Answer 1

编辑抱歉，我误解了你的问题。

更新了混合bash / perl解决方案：

#!/bin/bash

read -p "Enter search term: " search
perl -ne '
    BEGIN{ $pattern = $ARGV[0]; shift; $n=0 }
    @a=split /:/;
    if ($a[0] =~ m/$pattern/i or $a[1] =~ m/$pattern/i) {
      print "$a[0], $a[1],\$$a[2],$a[3],$a[4]\n";
      $n += 1;
    }
    END{ print "Found $n title(s).\n" }
  ' "$search" /home/student/Downloads/BookDB.txt

输出：

$ ./search.sh
Enter search term: star wars vi
Title: Star wars VI - return of the jedi
Found 1 title(s).

并不是说你需要正则表达式用于通配符（例如.而不是?，.*而不是*等等，而且你不需要将通配符放在搜索词的开头/结尾，以查找给定（子）字符串中任何位置的匹配项。

当然，您也可以在Perl中完全执行此操作，而不使用shell脚本包装器：

#!/usr/bin/env perl

use strict;
use warnings;

my $booklist = './books.txt';
my @book;

print "Enter search term: ";
chomp (my $pattern = <>);

open BOOKS, "<$booklist" or die $!;

my $n = 0;
foreach (<BOOKS>) {
  chomp;
  @book = split /:/;
  if ($book[0] =~ m/$pattern/i or $book[1] =~ m/$pattern/i) {
    print "$book[0], $book[1],\$$book[2],$book[3],$book[4]\n";
    $n += 1;
  }
}

close BOOKS;

print "Found $n title(s).\n";

对于awk解决方案，请参阅Adrian Frühwirth's answer。

Answer 2

search_book()
{
    awk -F':' -v search="$1" '$1 ~ search || $2 ~ search { i++; printf "%s, %s,$%s,%s,%s\n", $1, $2, $3, $4, $5 } END { printf "%d records found\n", i }' books.txt
}

_

$ cat books.txt
X never marks the spot:Indiana Jones:9.99:1:1
A fistful of barnacles:Captain Twiddlymore:9.99:2:1
The time I blew up LeChuck:Guybrush Threepwood:8.99:100:60
When I blew up LeChuck:Guybrush Threepwood:8.99:100:50
Where I blew up LeChuck:Guybrush Threepwood:8.99:100:2

_

$ search_book Indiana
X never marks the spot, Indiana Jones,$9.99,1,1
1 records found

$ search_book Guybrush
The time I blew up LeChuck, Guybrush Threepwood,$8.99,100,60
When I blew up LeChuck, Guybrush Threepwood,$8.99,100,50
Where I blew up LeChuck, Guybrush Threepwood,$8.99,100,2
3 records found

$ search_book barnacle
A fistful of barnacles, Captain Twiddlymore,$9.99,2,1
1 records found

$ search_book foo
0 records found

Answer 3

@ Wilson Turners关于Adrian的帖子的最后一点：

./book.sh 
Enter search term: barnacle
A fistful of barnacles, Captain Twiddlymore,$9.99,2,1
1 records found

以下是在现有代码中调用awk函数的方法：

#!/bin/bash
  search_book()
{
    awk -F':' -v search="$search" '$1 ~ search || $2 ~ search { i++; printf "%s, %s,$%s,%s,%s\n", $1, $2, $3, $4, $5 } END { printf "%d records found\n", i }' books.txt
}


read -p "Enter search term: " search

search_book

按标题/作者搜索书籍

3 个答案: