Re: Building an anonymous subroutine


Problems? Is your data what you think it is?
	PerlMonks

Re: Building an anonymous subroutine

by oylee (Pilgrim)

on Aug 12, 2002 at 19:45 UTC ( [id://189602]=note: print w/replies, xml )

Need Help??

in reply to Building an anonymous subroutine

Perhaps a hash of subs would be useful to lift out the conditional tests also, e.g.,

sub template {
    my $e = shift;
    my %actionhandlers = (
            p => sub {...blougat...},
            b => sub {...blimblim...},
            u => sub {...hoohaa...}
            ...
    );               
    return sub {
        ... common stuff ...
        $actionhandlers{$e}->(...args_if_any...);
        ... more stuff ...
    };  
}
[download]

Anonymous Lee