in reply to Re: Maintaining strict refs while Binding a set of variables to @_ or dying if they are not defined
in thread Maintaining strict refs while Binding a set of variables to @_ or dying if they are not defined

Using davorg's little quoting nice-ness with a bit of finessing, we get:
sub someFunc { my $i; local $"; for (qw( this that otherfield )) { die "$_ is undef" unless defined $_[$i++]; } "@_"; }


japhy -- Perl and Regex Hacker
  • Comment on Re: Re: Maintaining strict refs while Binding a set of variables to @_ or dying if they are not defined
  • Download Code