| Next | Hook::LexWrap | 15 |
$return = &$original;
$dummy = scalar $wrapper{post}->(@_, $return)
if $wrapper{post};
...
return $return;
This code was for scalar context calls
List context is handled similarly
$return = [ &$original ];
() = $wrapper{post}->(@_, $return)
if $wrapper{post};
...
return ref $return eq 'ARRAY' ? @$return : ($return);
The postwrapper gets an extra listref argument
| Next | ![]() |
Copyright © 2003 M. J. Dominus |