Getting the library name from a CL program

["Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>]

Here's a silly question.  I've always been able to get the library a program
was called from in RPG by using the program status data structure.  In a C/S
environment, this is really important, because it allows you to have
multiple environments based on just the library you call your initial
program from.

However, I have never figured out a way to do the same thing from a CL.
Anybody have any sneaky ways of doing this, or do I just use my tried and
true method of wrapping the CL program in an RPG wrapper that determines the
library?

Joe