Re: useless Useless warning

When I run your code I don't get that warning. Please try to post a small script that we can execute to reproduce the warnings. Then we can actually tell you how to avoid it.

Comment on Re: useless Useless warning

Replies are listed 'Best First'.
Re^2: useless Useless warning by aufflick (Deacon) on Jun 25, 2008 at 01:45 UTC
my bad - updated the original node with the code that actually causes the warning.	[reply]
Re^3: useless Useless warning by ikegami (Patriarch) on Jun 25, 2008 at 02:05 UTC
There's nothing in your update that generates a warning either. `use strict; use warnings; BEGIN { package My::Guard; sub new {} } { my $sth; my $guard1 = My::Guard->new(sub { $sth->finish }); my $guard2 = My::Guard->new(sub { $guard1; }); }` [download] `>perl script.pl >` [download] By the way, My::Guard already exists as ReleaseAction, Object::Destroyer, AtExit, Scope::Guard, Sub::ScopeFinalizer, etc.	[reply] [d/l] [select]