Script to check tnsnames.ora syntax

#!/usr/bin/bash

export CONNSTRINGS=`sort -u $TNS_ADMIN/tnsnames.ora | grep -v "^ " | grep -v "^#" | grep -v "^(" | grep -v "^)" | sed "s/ =//g" | grep -v "^$"`

echo "${CONNSTRINGS}" | while read line
do
   tnsping $line
done

exit 0