Think about Loose Coupling | |
PerlMonks |
Re: Repeatable rand() and keys() for debuggingby choroba (Cardinal) |
on Dec 09, 2022 at 17:30 UTC ( [id://11148688]=note: print w/replies, xml ) | Need Help?? |
It's too late to set the env vars in the begin block, they must be set in the process that runs Perl itself. This works:
If you really insist on doing it from Perl itself, the following seems to work:
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
In Section
Seekers of Perl Wisdom
|
|