Shell Programming and Scripting

#!/usr/bin/perl -w
use strict;

# Open input file in read mode
open INPUTFILE, "rich-input.txt", $ARGV[0] or die $!;

# Read the input file line by line :
while (my $input_line = <INPUTFILE>) {
$modif = "s/option domain-name-servers / bar /g";
if (preg_match('/option domain-name-servers/i', ) {(?=.*[a-z])(?=.*[A-Z])
preg_replace

find /dhcp -type f ! -name "*.bak" |while read line
do
  awk 'NR==FNR{a[$1]=$2;next} !/^#/ {for (i in a) if ($0~i) sub(i ".fs.us.",a[i])}1' rich-input.txt "$line" > temp
  echo mv temp "$line"
done

bash-3.2# ./test.sh 
mv temp dhcp/dhcp.in

drwxr-xr-x   6 richsark staff  204 Oct 28 22:26 .
drwxr-xr-x+ 22 richsark  staff  748 Oct 28 22:23 ..
drwxr-xr-x   3 root         staff  102 Oct 28 22:22 dhcp
-rw-r--r--   1 richsark staff  188 Oct 28 22:18 rich-input.txt
-rw-r--r--   1 root         staff    0 Oct 28 22:26 temp
-rwxrwxrwx   1 richsark  staff  180 Oct 28 22:22 test.sh

find dhcp -type f ! -name "*.bak" |while read line
do
  awk 'NR==FNR{a[$1]=$2;next} {for (i in a) if ($0~i) sub(i,a[i])}' rich-input.txt "$line" > temp
  echo mv temp "$line"
done

addnsr1pri 166.7.3.105
addnsr1sec 166.2.100.22
addnsr2pri 166.2.220.121
addnsr2sec 166.3.68.45
addnsr3pri 166.3.68.67
addnsr3sec 166.5.4.211
addnsr4pri 166.2.100.32
addnsr4sec 166.6.4.100

option domain-name-servers addnsr4pri.fs.us., addnsr4sec.fs.us.;

find /Users/richsark/test/dhcp -type f ! -name "*.bak" |while read line
do
  awk 'NR==FNR{a[$1]=$2;next} {for (i in a) if ($0~i) sub(i,a[i])}' rich-input.txt "$line" > temp
  echo mv temp "$line"
done

cat temp

bash-3.2# bash -x test2.sh 
+ read line
+ find /Users/richsark/test-US/dhcp -type f '!' -name '*.bak'
+ awk 'NR==FNR{a[$1]=$2;next} {for (i in a) if ($0~i) sub(i,a[i])}' rich-input.txt /Users/richsark/test-US/dhcp/dhcp.in
+ echo mv temp /Users/richsark/test-US/dhcp/dhcp.in
mv temp /Users/richsark/test-US/dhcp/dhcp.in
+ read line

find /Users/richsark/test-US/dhcp -type f ! -name "*.bak" |while read line
do
  awk 'NR==FNR{a[$1]=$2;next} !/^#/ {for (i in a) if ($0~i) sub(i ".fs.us.",a[i])}1' rich-input.txt "$line" > temp
  echo mv temp "$line"
done