Select Code to Download

$ perl -MCGI -e 'sub curry_method{ my ($o, $m) = @_;
                                   sub { $o->$m(@_) } }
...
                 $p = curry_method($c, 'p');
                 print $p->("Hello World"), "\n"'
<p>Hello World</p>

package Bridge::Simple;

...
}

1;