Help for this page

Select Code to Download


  1. or download this
    use constant foo qw(a b c);
@a = $h{foo()}
  2. or download this
    use constant foo [qw(a b c)];
@a = $h{@{foo()}}