Re^2: Sharing Getopts::Std amongst several related scripts

Thank you very much for such a comprehensive answer :)

I've changed the code in my library to look like so:

{
    package OPTS;
    use Getopt::Std;
    our %opts;
    getopts('fs', \%opts);
}
[download]

and in the script that requires the library, I have:

our %opts;
*opts = \%OPTS::opts;
if ($OPTS::opts{f}) { #do stuff }
[download]

and it all seems to work now the way I want it to. Although I'm still not really sure I fully understand what's going on here. I've just been flicking through Chapter 10 (Packages) in my trusty Camel Book. I think I need to study it some more before I get the hang of this.

But thanks again :)

Comment on Re^2: Sharing Getopts::Std amongst several related scripts Select or Download Code

Replies are listed 'Best First'.
Re^3: Sharing Getopts::Std amongst several related scripts by ikegami (Patriarch) on Dec 13, 2005 at 17:31 UTC
`our %opts; opts = \%OPTS::opts; if ($OPTS::opts{f}) { #do stuff }` [download] can be simplified to `if ($OPTS::opts{f}) { #do stuff }` [download] or `our %opts; opts = \%OPTS::opts; if ($opts{f}) { #do stuff }` [download]	[reply] [d/l] [select]