Instead of
I'd usemy ($var,$val) = /^\s*(.*?)\s*=\s*(.*)/; $conf{$var} = $val;
if (/^\s*(.*?)\s*=\s*(.*)/) { $conf{$1} = $2; } else { die "slowly and painfully"; }
In reply to Re^2: Dynamic variables and strict
by FunkyMonk
in thread Dynamic variables and strict
by solitaryrpr
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |