Shell Programming and Scripting

grep -rlm1 'B' $(grep -rlm1 'A' . )

grep -rlm1 'B' . | sed 's/\(^\|$\)/"/g' | xargs -n1 grep -rlm1 'A'

#!/bin/sh

find . -type f -exec sh -c '
    for f; do
        grep -q '\'"$1"\'' "$f" && grep -q '\'"$2"\'' "$f" && echo "$f"
    done' sh {} +

#!/usr/bin/env bash

# @(#) s1	Demonstrate finding filenames containing two specific characters.

# Uncomment to run script as external user.
# export PATH="/usr/local/bin:/usr/bin:/bin"
# Infrastructure details, environment, commands for forum posts. 
set +o nounset
pe() { for i;do printf "%s" "$i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
LC_ALL=C ; LANG=C ; export LC_ALL LANG
pe ; pe "Environment: LC_ALL = $LC_ALL, LANG = $LANG"
pe "(Versions displayed with local utility \"version\")"
c=$( ps | grep $$ | awk '{print $NF}' )
version >/dev/null 2>&1 && s=$(_eat $0 $1) || s=""
[ "$c" = "$s" ] && p="$s" || p="$c"
version >/dev/null 2>&1 && version "=o" $p find
set -o nounset

# Remove, create files.

LIST="AB BA 1A2B3 4B5A6 A7 B8"
for i in $LIST
do
  rm -f "$i"
  touch "$i"
done

pl " Files containing \"A\" or \"B\":"
ls *[A-Z]*

pl " Results of finding A and B in filename:"
find . -regextype posix-extended -regex '.*((A.*B)|(B.*A)).*'

exit 0

% ./s1

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian GNU/Linux 5.0 
GNU bash 3.2.39
find (GNU findutils) 4.4.0

-----
 Files containing "A" or "B":
1A2B3  4B5A6  A7  AB  B8  BA

-----
 Results of finding A and B in filename:
./BA
./AB
./1A2B3
./4B5A6

find . -name '*A*' -name '*B*'

#!/usr/bin/env bash

# @(#) s3	Demonstrate finding files containing two specific characters.
# See: http://www.incava.org/projects/glark/

# Uncomment to run script as external user.
# export PATH="/usr/local/bin:/usr/bin:/bin"
# Infrastructure details, environment, commands for forum posts. 
set +o nounset
pe() { for i;do printf "%s" "$i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
LC_ALL=C ; LANG=C ; export LC_ALL LANG
pe ; pe "Environment: LC_ALL = $LC_ALL, LANG = $LANG"
pe "(Versions displayed with local utility \"version\")"
c=$( ps | grep $$ | awk '{print $NF}' )
version >/dev/null 2>&1 && s=$(_eat $0 $1) || s=""
[ "$c" = "$s" ] && p="$s" || p="$c"
version >/dev/null 2>&1 && version "=o" $p find glark
set -o nounset

# Sample data files, using head & tail as a last resort.
pl " Files containing data \"A\" or \"B\":"
pe
specimen t* \
|| { pe "(head/tail)"; head -n 5 t*; pe " ||"; tail -n 5 t*; }

pl " Results of finding A and B contained in files, glark:"
find . -type f |
egrep -v '[sr]' |	# don't look at scripts
xargs glark -l --and=-1 "A" "B" --end-of-and

exit 0

% ./s3

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian GNU/Linux 5.0 
GNU bash 3.2.39
find (GNU findutils) 4.4.0
glark, version 1.8.0

-----
 Files containing data "A" or "B":

Whole: 5:0:5 of 3 lines in file "t1"
A
1
B

Whole: 5:0:5 of 3 lines in file "t2"
B
2
A

Whole: 5:0:5 of 1 lines in file "t3"
AB

Whole: 5:0:5 of 1 lines in file "t4"
BA

Whole: 5:0:5 of 2 lines in file "t5"
A
b

Whole: 5:0:5 of 2 lines in file "t6"
a
B

-----
 Results of finding A and B contained in files, glark:
./t4
./t3
./t2
./t1

[root@rhnserver test2]# cat a
A Bdsadadasdas C
Adasdas dasdasdasdB Cdsqdasdasd
a adasdasdasdaskl;
dwqewdqwodkwowe
asdpdkpoakoapsdadas dasdsd
A B Cdasdasdas
Adsadasda dasdasB C dasd asdas
Adsadas Bdasdasd Cdasdasdas
Adasdas B Casdasd

[root@rhnserver test2]# cat b
ABBB BBA A BC
232432423 5r345435

[root@rhnserver test2]# cat c
asasa A scascas BX
  A asodja;sdwedwkdk[dk[wedfwe[fkc  f
      B asasasqsqwe

 
[root@rhnserver test2]# ./findd
./a file contains A and B word..
./c file contains A and B word..

#!/bin/bash
oIFS=$IFS
rm -f filelst
find . ! \( -name "*bak1" -o -name "findd" -o -name "filelst" \) !  -type d -print | xargs -L 1 file | sed -n '/ASCII/p' >> filelst
for i in $( (cut -d: -f1 filelst) )
    do
# for backup orj files
cp $i ${i}_bak1
# change in file for
sed -i 's/  */-/g' $i
    done
Ax=0;Bx=0
i=1
rline=0
for files in `cat filelst | cut -d: -f1`
 do
  ((i++))
  ((rline++))
 while read -r line
  do
    c=$( (echo $line | grep -o "-" | wc -l) )
    ((c++))
    rfile=$( (cut -d: -f1 filelst | sed -n $rline"p") )
IFS="-"
chargr=("")
chargr=( $line )
#eval read -r wrd{1..$c} <<< $line
if [[ ! $Ax = 1 || ! $Bx = 1 ]] ; then
 for wrdx in ${chargr[@]}
  do
    if [ "$wrdx" = "A" ] ; then
  Ax=1
    fi
     if [ "$wrdx" = "B" ] ; then
  Bx=1
     fi
  done
fi
    c=0
  done < $files
 
 if [[ $Ax = 1 && $Bx = 1 ]] ; then
      echo $rfile file contains A and B word..
 fi
Ax=0;Bx=0
 
 done
iIFS=$oIFS
# if you files to orj state as last use another script
cat filelst | sed 's/:.*//' | while read mv; do mv -f ${mv}_bak1 $mv; done