Shell Programming and Scripting

opendir DIR,"." or die "Can't open dir : $!\n";
while (my $file=readdir(DIR))
{
        if ($file=~/ABC/)
        {
            print "Found file : $file\n";
        }
}

Found file : ABCDE
Found file : ABCJK

string=ABC
for file in `ls -l  /APPS/TEST | tr -s ' ' | sed '1d' | cut -d' ' -f 9`
do
        var=`expr index "$string" $file`
        if [ $var -gt 0 ]
        then
                echo "$file"
        fi
done

#!/bin/sh

for file in /APPS/TEST/*
do
  case "$file" in
     *ABC*) echo "$file"
	;;
    *)
	;;
  esac
done

 
ls -l | grep "ABC"

for file in /APPS/TEST/*
do
  case "$file" in
    *ABC*) 
       filename=${file##*/}
       echo "$filename"
       ;;
    *)
       ;;
  esac
done