everything(){
		
		while read line; do
			temp=`perl -e '$_=shift; /^([^#]\w+) ?= ?(\w+)/; print "$1\t$2\n"' "$line"`
 			 parameter=`echo $temp | awk '{print $1}'`
 			 case "$parameter" in
	"break_poll_skip") value=`echo $temp | awk '{print $2}'`
            			   if [ $value != 1024 ]; then
           			      echo "break_poll_skip is currently not set to its recommended value of: 1024"
          			     fi;;
	"TCP.NODELAY") value=`echo $temp | awk '{print $2}'`
      	         if [ $value != yes ]; then
                 echo "TCP.NODELAY is currently not set to its recommended value of: yes"
               fi;;
	"bequeath_detach") value=`echo $temp | awk '{print $2}'`
               if [ $value != yes ]; then
                 echo "bequeath_detach is currently not set to its recommended value of: yes"
               fi;;
	NAMES.DEFAULT_DOMAIN) value=`echo $temp | awk '{print $2}'`
               if [ $value != world ]; then
                 echo "NAMES.DEFAULT_DOMAIN is currently not set to its recommended value of: world"
               fi;;
  esac
done < $ORACLE_HOME/network/admin/sqlnet.ora
}

echo "What type of node are you on?"
echo "Type db for Database. Type app for Application. Type both for both."
print -n "Node: ";read var

case $var in
both)
echo "do everything"
everything
;;
app)
echo "do app stuff"
;;
db)
echo "do db stuff"
;;
esac

while read line; do
temp=`perl -e '$_=shift; /^([^#]\w+) ?= ?(\w+)/; print "$1\t$2\n"' "$line"`
parameter=`echo $temp | awk '{print $1}'`
case "$parameter" in
"break_poll_skip") value=`echo $temp | awk '{print $2}'`
if [ $value != 1024 ]; then
echo "break_poll_skip is currently not set to its recommended value of: 1024"
fi;;
"TCP.NODELAY") value=`echo $temp | awk '{print $2}'`
if [ $value != yes ]; then
echo "TCP.NODELAY is currently not set to its recommended value of: yes"
fi;;
"bequeath_detach") value=`echo $temp | awk '{print $2}'`
if [ $value != yes ]; then
echo "bequeath_detach is currently not set to its recommended value of: yes"
fi;;
NAMES.DEFAULT_DOMAIN) value=`echo $temp | awk '{print $2}'`
if [ $value != world ]; then
echo "NAMES.DEFAULT_DOMAIN is currently not set to its recommended value of: world"
fi;;
esac
done < $ORACLE_HOME/network/admin/sqlnet.ora