$CHECK_DB = system ("sqlplus -s username/password\@dbname >> /dev/null 2>&1");

if ( $CHECK_DB eq 0 )
 {
  print LOG "Msg: DB link up\n";
 }
else
 {
  print LOG "Msg: DB link down!\n";
 }