Wilson Turner
Wilson Turner

Reputation: 35

Search book by title/author

Hi i am new to shell programming i hope u can guide me along thanks.

Hi i need a function to search either book title or author from a .txt file and echo out the following

Title:*Enter*
Author:Scissorhands

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

eg

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

my file format is as below

Book name:author:price:Qty:Qty Sold

harry potter:james:12.99:197:101

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

Upvotes: 1

Views: 701

Answers (3)

Ansgar Wiechers
Ansgar Wiechers

Reputation: 200193

Edit: Sorry, I misunderstood your question.

Updated mixed / solution:

#!/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

Output:

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

Not that you need regular expressions for wildcards (i.e. . instead of ?, .* instead of *, etc.), and you don't need to put wildcards at beginning/end of the search term to find matches anywhere in a given (sub)string.

Of course you could also do this entirely in Perl, without the shell script wrapper:

#!/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";

For an solution see Adrian Frühwirth's answer.

Upvotes: 1

V H
V H

Reputation: 8587

@ Wilson Turners last point on Adrian's post:

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

Here is how you call the awk function within your existing code:

#!/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

Upvotes: 0

Adrian Fr&#252;hwirth
Adrian Fr&#252;hwirth

Reputation: 45526

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

Upvotes: 1

Related Questions