How do you set default value to a variable in Perl?

Use the '||=' or '|='operator.

For instance,

$color ||= 'Green';
will set $color to 'Green' if it is empty, undefined or contains zero. Otherwise it will retain its original value.