Help for this page

Select Code to Download


  1. or download this
    SCALAR=Some value
LIST=Foo,Bar,Baz
HASH=Foo:Bar,Baz:Quux
  2. or download this
    DOMAIN=@example.com
USER=sAMAccountName.DOMAIN
...
PRE=a874f4u
POST=ea748tyoal
MAIL=join(DOT,givenName,sn).DOMAIN
  3. or download this
    %h = (
    DOMAIN => '@example.com',
...
    PASS   => sub { md5sum($c->{PRE} . $r->{sAMAcountName} . $c->{POST
+}, 15) },
    MAIL   => sub { join('.', $r->{givenName}, $r->{sn}).$c->{DOMAIN} 
+},
);
  4. or download this
    $out{$key} = $h{$key}->();
  5. or download this
    %out = %h;
  6. or download this
    package Sub::Hash;

...


=cut