NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Without JavaScript enabled, you might want to use the classic discussion system instead. If you login, you can remember this preference.

Recursive closures (Score:2)

by Simon (89)

See B::Utils for a doubly-recursive closure. That broke my brane.
Recursive closures (Score:2)

by TorgoX (1933)

I think I use a bunch of recursive closures in HTML::Element. The trick is that (unless you use a Y-operator, which is fiendish) once you define this:
my $x; $x = sub { ... $x->(...) ... };
...you've just defined a circular data structure. So once you're finished with the whole excursion of calling $x, you have to undef $x or the sub-object doesn't get destroyed -- at least last I checked.
- Re:Recursive closures (Score:1)
  
  by koschei (147)
  
  Do you happen to have an example of the use of one of these fiendish Y operators in Perl? (If you don't, don't feel compelled to write one if you don't want to, I'm mostly only curious for curiosity's sake.)
  
  --
  ---ict / Spoon
  - Y Operator in Perl (Score:2)
    
    by TorgoX (1933)
    
    http://www.speech.cs.cmu.edu/~sburke/pub/y_operator.pl [cmu.edu]
    - Re: Y Operator in Perl (Score:1)
      
      by robin (1821)
      
      That reminds me of a staggering bit of obfuscated Haskell programming [willamette.edu].