sub a {
  my %conf = ( blah => 1200 );

  $conf{ shift };
}

print a('blah');