Re^5: Warnings not working on one machine

Thanks for your replies. I guess I have to put the use warnings; into both the calling script and the called utilities library, which is what I have now done.

I was hoping the use warnings; in the calling script would have been enough to ensure all called libraries had the same warnings behaviour when used by that script. That way the same library could be used by different scripts with different warnings behaviour. Not sure if they had other concerns in mind when they decided to make it like this, but I'm happy that I now finally know what's going on and how to make it work for me.

Thank you for your assistance!

Comment on Re^5: Warnings not working on one machine Select or Download Code

Replies are listed 'Best First'.
Re^6: Warnings not working on one machine by hippo (Archbishop) on Jan 29, 2018 at 15:50 UTC
Have you read Reporting Warnings from a Module? This can be used to achieve precisely what you have outlined as your goal here. eg: `package Foo; use warnings::register; sub bar { $^W = warnings::enabled () ? 1 : 0; print $baz; }; 1; package main; use warnings 'Foo'; Foo::bar (); no warnings 'Foo'; Foo::bar ();` [download] If you run this you will only see one occurrence of the warning `Use of uninitialized value $Foo::baz in print at /tmp/warnshow.pl line 9.` which is caused by the first call to `Foo::bar ()`. The second call does not generate the warning. HTH.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^6: Warnings not working on one machine
by hippo (Archbishop) on Jan 29, 2018 at 15:50 UTC

Have you read Reporting Warnings from a Module? This can be used to achieve precisely what you have outlined as your goal here. eg:

package Foo;

use warnings::register;

sub bar {
    $^W = warnings::enabled () ? 1 : 0;
    print $baz;
};

1;

package main;

use warnings 'Foo';
Foo::bar ();

no warnings 'Foo';
Foo::bar ();
[download]

If you run this you will only see one occurrence of the warning Use of uninitialized value $Foo::baz in print at /tmp/warnshow.pl line 9. which is caused by the first call to Foo::bar (). The second call does not generate the warning. HTH.

[reply]
[d/l]
[select]