{ my $g = wrapper->instance; $g->{'key'} = 'value'; } $h = wrapper->instance; die "Bad mojo!" if exists $h->{'key'};
perl -le 'print+unpack"N",pack"B32","00000000000000000000001001101101"'
In reply to Re: Re: Re: Please review Class::WeakSingleton
by rob_au
in thread Please review Class::WeakSingleton
by diotalevi
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |