small bug in oraenv++

[thedarkmucko]

Hello, I found a small bug in your oraenv++. Line 337
sub(".db$", "", l_name) ; # Remove the consumer group

If you have a resource like p1superdb.db your sub regex will create an output of p1supe
with sub("/.db$/", "", l_name) it will print correctly.