Help for this page

Select Code to Download


  1. or download this
    location=dungeon
name=corwin
weapon=grayswandir
  2. or download this
    my %data = ();    # initialize hash
while (<INPUT>) {    # assume you have the file open already
    my ($key, $value) = split(/=/, $_, 2);
    $data{$key} = $value;
}
  3. or download this
    $data{$arrname} = \@array;
    # or
$data{$arrname} = [ @array ];