From: Mateu X Hunter Date: Thu, 15 Dec 2011 15:33:11 +0000 (-0700) Subject: No need for ScalarRef when using Sub::Quote X-Git-Tag: v0.009013~7 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6b3002b277063cbb60eb0f1dcc0d62f9a38a5dc0;p=gitmo%2FRole-Tiny.git No need for ScalarRef when using Sub::Quote --- diff --git a/lib/Sub/Quote.pm b/lib/Sub/Quote.pm index f75f79d..b5c5cc6 100644 --- a/lib/Sub/Quote.pm +++ b/lib/Sub/Quote.pm @@ -154,10 +154,10 @@ Sub::Quote - efficient generation of subroutines via string eval quote_sub 'Silly::doggy', q{ print "woof" }; - my $sound; $$sound = 0; + my $sound = 0; quote_sub 'Silly::dagron', - q{ print ++$$sound % 2 ? 'burninate' : 'roar' }, + q{ print ++$sound % 2 ? 'burninate' : 'roar' }, { '$sound' => \$sound }; And elsewhere: