Select Code to Download

 
sub init { 
   die "ERROR: \$var already set." if defined $_[0];
...
init $var1 => 'value1';  # pretty elegant, right?
init $var2 => 'value2';
init $var3 => 'value3';