Re: default values

Assuming the 0 is not one of the possible values

$val ||= $default_val;
[download]

If 0 could be proper value (and isn't the default, otherwise the above would still work)

$val = $default_val unless defined $val;
[download]

Dealing with possible undefs and 0 as the state of $val will require it 3 times I think

$val = $default_val unless defined $val && length($val);
[download]

I suspect others might have shorter solns... FORE!

Comment on Re: default values Select or Download Code

Replies are listed 'Best First'.
Re: Re: default values by BUU (Prior) on Sep 16, 2003 at 05:19 UTC
`use Perl6; $val//=$default_val;` [download] =]	[reply] [d/l]
Re: Re: Re: default values by tachyon (Chancellor) on Sep 16, 2003 at 06:56 UTC
I tried this but it did not work. ;-) cheers tachyon s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print	[reply]
Re: Re: Re: Re: default values by liz (Monsignor) on Sep 16, 2003 at 07:44 UTC
You need bleadperl or 5.8.1 and one of H Merijn Brand's defined-or patches for // and //= to work. Liz	[reply]
Re: Re: Re: Re: default values by Anonymous Monk on Sep 16, 2003 at 15:20 UTC
Where did you get the Perl6 module from? It's not on cpan, so I don't know how you tried it (and "it doesn't work" doesn't mean much).	[reply]